K
Khách
Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
NT
2
Các câu hỏi dưới đây có thể giống với câu hỏi trên
NB
26 tháng 4 2023
program TongSoChan;
var
n, i, x, tong: integer;
begin
write('Nhap so nguyen n: ');
readln(n);
tong := 0;
for i := 1 to n do
begin
read(x);
if x mod 2 = 0 then
tong := tong + x;
end;
writeln('Tong cac so chan la: ', tong);
readln;
end.
Dự đoán KQ chạy:
1
2
3
4
5
Nó sẽ in ra `1 2 3 4 5`.