Вопрос по информатике:
В двумерном массиве обнулить строку, содержащую отрицательные элементы
Пожаловаться
- 15.09.2018 10:07
- Информатика
- remove_red_eye 6166
- thumb_up 16
Ответы и объяснения 1
Var a:array[1..10,1..10] of real;i,j,l:integer;beginfor i:=1 to 10 do begin writeln; for j:=1 to 10 do begin a[i,j]:=random(10)-1; write(a[i,j],' '); end; end; for i:=1 to 10 do begin for j:=1 to 10 do if a[i,j]<0 then begin for l:=1 to 10 do a[i,l]:=0; end; end; writeln;for i:=1 to 10 do begin writeln; for j:=1 to 10 do begin write(a[i,j],' '); end; end; end.
Пожаловаться
- 16.09.2018 22:11
- thumb_up 23
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Новые вопросы
Интересные вопросы