Bài 11: Kiểu mảng

Trân trân

Cho dãy số nguyên dương A=(a1,…,an) với 3<n<_100 viết đoạn chương trình in ra tổng số lẻ trong dãy số vừa nhập 

Nguyễn Lê Phước Thịnh
10 tháng 2 2022 lúc 22:19

uses crt;

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

i,n,t:integer;

begin

clrscr;

readln(n);

t:=0;

for i:=1 to n do 

begin

readln(a[i]);

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

end;

writeln(t);

readln;

end.


Các câu hỏi tương tự
Sarah Lilia
Xem chi tiết
Phong Vũ
Xem chi tiết
Hoàng Trần Thanh Hà _THP...
Xem chi tiết
Sói Channel
Xem chi tiết
Thái Thích
Xem chi tiết
Hoàng Trần Thanh Hà _THP...
Xem chi tiết
Hoangf Thu
Xem chi tiết
fyujg
Xem chi tiết
Nhảy chân sáo mà từ từ đ...
Xem chi tiết