Bài 11: Kiểu mảng

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Nguyễn Phúc Hưng
Cho dãy A gồm N số nguyên (N nhỏ hơn hoặc bằng 250) và dãy A1,...An đc nhập từ bàn phím.Đưa ra màn hình tổng các số lẻ có trong dãy
Nguyễn Lê Phước Thịnh
23 tháng 2 2021 lúc 21:41

uses crt;

var a:array[1..250]of integer;

i,n,t:integer;

begin

clrscr;

write('Nhap n='); readln(n);

for i:=1 to n do

begin

write('A[',i,']='); readln(a[i]);

end;

t:=0;

for i:=1 to n do 

  if a[i] mod 2<>0 then t:=t+a[i];

writeln(t);

readln;

end.


Các câu hỏi tương tự
Nguyễn Phúc Hưng
Xem chi tiết
Hải Phong
Xem chi tiết
Sarah Lilia
Xem chi tiết
Huỳnh Mai Anh Thư
Xem chi tiết
Nhảy chân sáo mà từ từ đ...
Xem chi tiết
Hoàng Trần Thanh Hà _THP...
Xem chi tiết
Oanh Nguyễn
Xem chi tiết
Hoàng Trần Thanh Hà _THP...
Xem chi tiết
Thái Thích
Xem chi tiết