Angka berurutan

menampilkan Angka berurutan dengan pascal

program menampilkan_angka_berurut;
uses wincrt;
var
n,i,j:integer;
begin
write('Masukkan jumlah inputan= ');read(n);
for i:=1 to n do
for j:=1 to i do
begin
write(j,' ');
end;
end.

Gambar :


syntax pascal klik disini.