Дан целочисленный прямоугольный массив 6x10. Опишите в программе "ПаскальАВС" алгоритм вычисления суммы минимальных элементов из каждой строки. Напечатать значение этой суммы. Предполагается, что в каждой строке минимальный элемент единственный.

Question

Информатика

Борюня

28 сентября, 02:23

Дан целочисленный прямоугольный массив 6x10. Опишите в программе "ПаскальАВС" алгоритм вычисления суммы минимальных элементов из каждой строки. Напечатать значение этой суммы. Предполагается, что в каждой строке минимальный элемент единственный.

+3

Ответы (1)

Знаете ответ на вопрос?

Элюна · Answer 1

Var

a:array [1 ... 6,1 ... 10] of integer; b, i, j, k, l: integer;

begin

b:=0;

for i:=1 to 6 do

begin

k:=32000;

for j:=1 to 10 do

begin

read (l) ;

if (l
end;

b+=k;

end;

write (b) ;

end.

Проверено:

1 2 3 4 5 6 7 8 9 10

10 9 8 7 6 5 4 3 2 1

1 2 3 4 5 6 7 8 9 10

10 9 8 7 6 5 4 3 2 1

1 2 3 4 5 6 7 8 9 10

10 9 8 7 6 5 4 3 2 1

Ответ - 6