Hãy luôn nhớ cảm ơn và vote 5*
nếu câu trả lời hữu ích nhé!
Có thể hoán đổi cách sử dụng của câu lệnh For .. to .. do và While .. do được.
-----
Mình làm ví dụ về xuất số từ 1 đến n nhé!
-----
Ví dụ về For .. to .. do
-----
Uses crt;
Var n,i: longint;
Begin
Clrscr;
Write('Nhap n: '); Readln(n);
For i:=1 to n do Write(i:5);
Readln
End.
-----
Ví dụ về While .. do
-----
Uses crt;
Var n,i: longint;
Begin
Clrscr;
Write('Nhap n: '); Readln(n);
i:=1;
While i<=n do
Begin
Write(i:5);
inc(i);
End;
Readln
End.
Hãy giúp mọi người biết câu trả lời này thế nào?
Bảng tin