uses
SysUtils;
var
x:integer;
begin
x:=1;
repeat
writeln(x);
x:=x+1;
until x=10;
readln;
{ TODO -oUser -cConsole Main : Insert code here }
end.
Welcome to my blog
Senang bisa membantu kalian semua
dan Semoga tulisan saya bermanfaat,
Sekenannya komentar anda supaya saya bisa
mengerti apa yang di dapatkan oleh pembaca
0 komentar:
Posting Komentar