Есть ответ 👍

Дан массив, состоящий из 10 целых чисел. Элементы массива могут принимать Значения от 10 до 1000. Найти и вывести сумму наибольшего элемента массива кратного трем и наименьшего элемента массива, оканчивающегося на 7.

124
342
Посмотреть ответы 3

Ответы на вопрос:


prorgam sp;

var A: array [1..10] of integer;

I,S: integer;

begin I:=0;

for I:=1 to 10 do S:=S+A[I];

writeln (S);

end.

Объяснение:

gulser
4,8(37 оценок)

PascalABC.Net

begin

 var a := ArrRandom(10, 10, 1000);

 Println('Исходный массив:', a);

 Println('Сумма: ', (a.Where(x -> x mod 3 = 0).Max) + (a.Where(x -> x mod 10 = 7).Min));  

end.


голливуд, в катологе фантастика создали подкаталог голивуд и туда переместили трансформеры.doc

Популярно: Информатика