Предмет: Информатика,
автор: anidubrulitp47cw0
Сформировать квадратную матрицу порядка n по заданному образцу
1 1 1...1 1 1
222...220
333...000
..................
..................
n-1 n-1 0...0 0 0
n 0 0...0 0 0
Ответы
Автор ответа:
0
решение ниже в комментарии
Похожие вопросы
Предмет: Русский язык,
автор: musihinaekaterina812
Предмет: Математика,
автор: alagezrzazade2011
Предмет: Українська література,
автор: Аноним
Предмет: Биология,
автор: Аноним
Предмет: Литература,
автор: Chereshnya02
var
i1, i, n, count : integer;
begin
read(n);
case n of
1..9: count:=2;
10..99: count:=3;
100..999: count:=4;
else count:=5;
end;
for i:=0 to n-1 do
begin
writeln;
for i1:=0 to n-i-1 do write(i+1:count);
for i1:=n-i+1 to n do write(0:count);
end;
end.