Регистрация
Ilusich
13.04.2020 13:12
Информатика
Есть ответ 👍

Укажите все верно записанные строки оператора ветвления.

174
359
Посмотреть ответы 2

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

nastyamal0101
nastyamal0101
4,5(41 оценок)

4 и 5 строка

Объяснение:

Vzorr
Vzorr
4,6(38 оценок)
Const nm = 20; var x: array[1..nm,1..nm] of integer; i,j,n,m,k,p: integer; b: array[1..nm] of integer; beginwrite('введите строки n и столбцы m '); read(n,m); p: =1; for i: =1 to n do beginfor j: =1 to m do beginx[i,j]: = random(30)-5; write(x[i,j]: 4); end; writeln; end; writeln; for j: =1 to m do beginfor i: =1 to n do beginif x[i,j] > 0 then beginp: = p * x[i,j]; k: = k+1; endelse  beginp: = 1; k: =0; end; end; if k = n then b[j]: =p; p: = 1; k: =0; end; for i: =1 to m dowrite(i: 2,b[i]: 9); end.

Популярно: Информатика