1. дан массив в(7). найти модуль минимального и квадратный корень максимального элементов массива. массив заполняется с клавиатуры. 2. массив d(6) задан на [-1,50). найти произведение всех элементов массива, кроме минимального и максимального. заранее )

158

359

Посмотреть ответы 2

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

vladasic

Информатика

4,6(66 оценок)

// pascalabc.net 3.1, сборка 1230 от 27.04.2016 begin var b: =readarrinteger('введите 7 чисел',7); writeln('|min|=',abs(b.min),', sqrt(max)=',sqrt(b.max)); var d: =arrrandom(6,-1,50); d.println; writeln('произведение: ',d.except(arr(d.min,d.max)) .aggregate(integer(,i)-> p*i)) end. тестовое решение введите 7 чисел 35 -10 18 0 16 8 13 |min|=10, sqrt(max)=5.91607978309962 29 11 38 49 45 19 произведение: 942210