Ôn tập cuối năm

NA

Viết chương trình nhập mảng 1 chiều gồm 10 số nguyên. Đưa ra màn hình tổng các số hạng là chẵn

ML
2 tháng 5 2023 lúc 20:53

Program HOC24;

var i: byte;

t: longint;

a: array[1..10] of integer;

begin

For i:=1 to 10 do 

begin

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

end;

for i:=1 to 10 do if a[i] mod 2=0 then t:=t+a[i];

write('Tong cac so hang chan la: ',t);

readln

end.

Bình luận (0)

Các câu hỏi tương tự
HD
Xem chi tiết
NM
Xem chi tiết
NM
Xem chi tiết
NM
Xem chi tiết
HH
Xem chi tiết
NM
Xem chi tiết
BL
Xem chi tiết
H24
Xem chi tiết
TV
Xem chi tiết