TN

viết chương trình in số chẵn nhỏ hơn hoặc bằng n bằng vòng lặp for...do

 

KL
20 tháng 4 2022 lúc 20:35

Var n,i,so:integer;

Begin

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

For i:=1 to n do

Begin

Write('Nhap so thu ',i,' = ');readln(so);

If so mod 2 = 0 then writeln(so);

End;

Readln;

End.

Bình luận (0)

Các câu hỏi tương tự
NT
Xem chi tiết
CQ
Xem chi tiết
3U
Xem chi tiết
HT
Xem chi tiết
LA
Xem chi tiết
LA
Xem chi tiết
TN
Xem chi tiết
H24
Xem chi tiết
T8
Xem chi tiết