Pascal/Упражнения І

From Wikiversity
var i:integer;
begin
 for i:=1 to 10 do writeln(i);
 readln;
end.
Retrieved from "https://beta.wikiversity.org/w/index.php?title=Pascal/Упражнения_І&oldid=198060"