Есть ответ 👍

НУЖНА Дан целочисленный массив из 30 элементов. Элементы массива могут принимать натуральные значения от 1 до 10000 включительно. Составить программу
а) которая находит произведение элементов массива, меньших 100 и при этом имеющих
нечетные значения
б) которая находит минимальный элемент и заменяет каждый элемент массива, меньший 100 и
имеющий нечетное значение на минимальный элемент
в) упорядочить массив по возрастанию.

190
499
Посмотреть ответы 1

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

Hkolnik32
4,6(80 оценок)

Var   n,i: integer;   x,sr: real; begin write('сколько учеников: '); readln(n); for i: =1 to n do   begin   write('введите рост ',i,'-го ученика: ');   readln(x);   sr: =sr+x;   end; sr: =sr/n; writeln('средний рост: ',sr) end.

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