с номерами 4, 6, 7 и 8 (№4 не обязательно, но он на доп. оценку, так что была бы рада вашей Заранее

128

425

Посмотреть ответы 1

Ответы на вопрос:

tlplusp02d7u

Информатика

4,7(7 оценок)

var a: array[1..20,1..20]of integer; i,j: integer; beginfor i: =1 to 4 dofor j: =1 to 3 doreadln(a[i,j]); for i: =1 to 4 dofor j: =1 to 3 doif a[i,j]=0 then a[i,j]: =a[1,1]; for i: =1 to 4 do beginfor j: =1 to 3 dowrite(a[i,j],' '); writeln; end; end.