Verified answer

Ответ:

program wr;

begin

 WriteLn (1);

 WriteLn (6);

 WriteLn (2, ' ',2);

 WriteLn (7, ' ', 7);

 WriteLn (3, ' ', 3, ' ', 3);

 WriteLn (8, ' ', 8, ' ', 8);

 WriteLn (4, ' ', 4, ' ', 4, ' ', 4);

 WriteLn (9, ' ', 9, ' ', 9, ' ', 9);

 ReadLn;

end.