Quảng cáo
1 câu trả lời 240
Program Hotboy;
Uses crt;
var n,i:integer
Begin
Clrscr;
Write('Nhap so n tu ban phim :');
Readln(n);
For i:=1 to n do
If (i mod 2=0 ) then Write('cac so chan la',i,' ');
Else
Write('cac so le la',i);
Readln
End.
Quảng cáo
Bạn cần hỏi gì?
Câu hỏi hot cùng chủ đề
-
Đã trả lời bởi chuyên gia
86346
Gửi báo cáo thành công!
