MPL Documentation

FOR

iterates a block of code for each value in the range first to last.

for variable (first) to (last) do 
   (block of statements);

var
   Loop:Longint;

Begin
   For Loop:=1 to ParamCount do Writeln(ParamStr(Loop));
end;

Source: Reserved Words

See Also:

while, repeat, break, continue, exit.