viết chương trình in ra 5 số tự nhiên liên tiếp bắt đầu bằng số 1
2 câu trả lời
Câu lệnh : For i:= 1 to 5 do
Write('5 so tu nhien tu 1 la',i);
Hoặc
While i>=5 do
Begin
Inc(i);
Write('5 so tu nhien tu 1 la',i);
End;
@khongmotai7456
program sotunhien;
var i: integer;
begin
for i := 1 to 5 do writeln (i);
readln;
end.
Câu hỏi trong lớp
Xem thêm