In ra 100 số tự nhiên đầu tiên. Các bạn giúp mình với!!

2 câu trả lời

Program FNG;
Uses crt;
Var i: longint;
Begin
        Clrscr;
        For i:=1 to 100 do Write(i,'   ');
        Readln
End.

Program Hotboy ;

Uses crt; 

I: integer ;

Begin

Clrscr;

For i:=1 to 100 do

Write(i)

Readln

End.