Вопрос:
Задана прямоугольная матрица 5х3. Найти номер строки, имеющей наименьшую сумму элементов.
- 07.08.2018 14:01
- Другие предметы
- remove_red_eye 10048
- thumb_up 14
Ответы и объяснения 1
Var
a:array[1..5,1..3]of integer;
i,j,s,smin,n:integer;
begin
n:=1;
for i:=1 to 5 do
begin
for j:=1 to 3 do
begin
a[i,j]:=random(10);
write(a[i,j]:4);
s:=s+a[i,j];
end;
if i=1 then smin:=s;
if s
smin:=s;
n:=i;
end;
writeln('sum=':8,s);
s:=0;
end;
writeln('Номер искомой строки: ',n);
end.
- 08.08.2018 17:56
- thumb_up 15
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Другие предметы.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
В данном разделе публикуются вопросы и ответы на них к непопулярным предметам.