Задача №1Заполнить массив размерностью 20 случайным образом числами от 0 до 150. Найти сумму максимального и минимального элементов массива.Задача №2Заполнить матрицу размером 5х5 случайными числами от 0 до 200. Найти сумму эле...
Задача №1
Заполнить массив размерностью 20 случайным образом числами от 0 до 150. Найти сумму максимального и минимального элементов массива.
Задача №2
Заполнить матрицу размером 5х5 случайными числами от 0 до 200. Найти сумму элементов массива побочной диагонали.
Гость
Ответ(ы) на вопрос:
Гость1) var a:array[1..20] of integer;
max,min,n,i:integer;
begin randomize;
n:=20;
for i:=1 to n do a[i]:=random(150);
begin
min:=a[1];
for i:=1 to n do if a[1]>a[i] then min:=a[i];
end;
begin
max:=a[1];
for i:=1 to n do if a[1]
Не нашли ответ?
Похожие вопросы