Вопрос по информатике:
Дана Матрица А(5,5).
1. Найти сумму S отрицательных элементов расположенных на побочной диагонали.
2. Найти наибольший элемент 2-го столбца.
3. Заменить найденные максимальный элемент во 2-м столбце на значение суммы S
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 14.02.2017 19:19
- Информатика
- remove_red_eye 4612
- thumb_up 38
Ответы и объяснения 1
const n=5;
var a:array [1..n,1..n] of Integer;
i,max,ind,s,j:integer;
begin
s:=0;
Randomize;
for i:=1 to n do
for j:=1 to n do
a[i,j]:=Random(100)-50;
for i:=1 to n do
begin
for j:=1 to n do
write(a[i,j]:4);
writeln;
end;
j:=6;
for i:=1 to n do
begin
Dec(j);
if a[i,j]<0 then
s:=s+a[i,j];
end;
max:=a[1,2];
ind:=1;
for i:=1 to n do
if Abs(a[i,2])>Abs(max) then
begin
max:=a[i,2];
ind:=i;
end;
a[ind,2]:=s;
Writeln;
Writeln;
Writeln('a)Summ: ',s);
writeln('b)Max: ',max);
Writeln;
Writeln('c)');
for i:=1 to n do
begin
for j:=1 to n do
write(a[i,j]:4);
writeln;
end;
readln;
end.
- 15.02.2017 04:33
- thumb_up 15
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.