Написать рекурсивную программу вывода на экран следующей картинки: 1111111111111111 (16 раз)
222222222222 (12 раз)
33333333 (8 раз)
4444 (4 раза)
33333333 (8 раз)
222222222222 (12 раз)
1111111111111111 (16 раз)

procedure p(k:integer);var i:integer;beginfor i:=1 to 20-4*k do write(k);writelnif k<4 then  begin  p(k+1);  for i:=1 to 20-4*k do write(k);  writeln; end;end;beginp(1);end.Результат:1111111111111111222222222222333333334444333333332222222222221111111111111111