Сделать программу на паскале, используя цикл for. нужно, чтобы в окне выведено было следующее 1 22 333 4444 55555 и так до 20. заранее.

Var
  i,j:integer;

begin
  for i:=1 to 20 do begin
    for j:=1 to i do Write(i);
    Writeln
  end
end.