< Delphi Programming
procedure takethis();
var I: integer;

begin
for I := 1 to 10 
  print(I);
end;
This article is issued from Wikibooks. The text is licensed under Creative Commons - Attribution - Sharealike. Additional terms may apply for the media files.