Lê Nguyễn Ánh Nguyệt

Viết chương trình nhập vào 1 dãy số nguyên . In ra màn hình tổng các chẵn , tổng các số lẻ có trong dãy đã cho .

 

 

Minh Lệ
25 tháng 4 2023 lúc 19:55

Program HOC24;

var i,n: integer;

t1,t2: longint;

begin

write('Nhap so phan tu cua day: '); readln(a[i]);

for i:=1 to n do

begin

write('Nhap phan tu thu ',i,': '); readln(a[i]);

end;

t1:=0; t2:=0;

for i:=1 to n do if a[i] mod 2=0 then t1:=t1+a[i] else t2:=t2+a[i];

writeln('Tong cac so chan la: ',t1);

write('Tong cac so le la: ',t2);

readln

end.

Bình luận (0)

Các câu hỏi tương tự
Ngáo Ngơ Alice
Xem chi tiết
Mai Phương Lê
Xem chi tiết
AETC丶NhấtㅤGG
Xem chi tiết
Đặng Đức Nam
Xem chi tiết
Lê Thùy Ánh
Xem chi tiết
Bùi duy anh
Xem chi tiết
Ngọc Nguyễn
Xem chi tiết
Minh Duy
Xem chi tiết
Thiên Kim
Xem chi tiết