Program Deret Piramida

program piramida;
uses winCrt;
var n,i,j:integer;
begin
read(n);
for i:=1 to n do
begin 
for j:= 1 to i do
begin
write (i);
end;
writeln;
end;
end.