Quảng cáo
1 câu trả lời 135
2 năm trước
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
Câu hỏi hot cùng chủ đề
Gửi báo cáo thành công!