Pascal iteration

program IterationExample;
var
  i: Integer;
begin
  for i := 1 to 10 do
  begin
    // Perform some action here
  end;
end.