viết chương trình nhập vào số nguyên N.In ra màn hình từ số 1 đến số N mỗi số trên một dòng.VD: N=5--> kết quả trên màn hình: 1 2 3 4 ai giúp mình trả lời nhanh với
2 câu trả lời
Program BTT;
Uses crt;
Var n,i: longint;
Begin
Clrscr;
Write('Nhap n: '); Readln(n);
For i:=1 to n do Writeln(i);
Readln
End.
Program bt;
Uses crt;
Var n,i:integer;
Begin
Clrscr;
Write('Nhap N: '); Readln(n);
For i:=1 to n do writeln(i);
Readln;
End.