In this article I would like to share with you a sample program to demonstrate how to use for loop statement in Pascal. In this sample program I am using Turbo Pascal 5.0 in DOS as my pascal compiler.
My mobile number here in the Philippines is 09173084360.
Sample Program Output
Program Listing
Program For_Loop;
Uses Crt;
Var A : Integer;
Begin
Clrscr;
Write('For Loop Statement in Pascal');
writeln;
writeln;
For A := 1 to 10 Do
Begin
Write(' ',A,' ');
End;
Writeln;
Writeln;
For A := 10 downto 1 Do
Begin
Write(' ',A,' ');
End;
Readln;
End.
