Мне решить по информатике в паскале условие: в одномерный целрчисленном массиве из 25 элементов определить разность между max и min элементами, определить средний элемент, определить сумму нечетных элементов.

177

206

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

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

garipova02

Информатика

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

// pascalabc.net 3.2, сборка 1449 от 23.05.2017// внимание! если программа не работает, обновите версию! begin var a: =arrrandom(25,1,99); a.println; writeln('max-min=',a.max-a.min); writeln('среднее арифметическое=',a.average); writeln('сумма нечетных=',a.where(x-> x.isodd).sum); end. пример 29 64 88 37 45 50 81 67 69 93 82 42 5 22 42 17 11 21 94 6 6 58 51 24 14 max-min=89 среднее арифметическое=44.72 сумма нечетных=526

тупой1712

Информатика

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

Program n_2; var i: integer; a: array [1..5] of integer; begin randomize; for i: = 1 to 5 do a[i]: =random(44)+1; for i: = 1 to 5 do writeln('a[i]=',a[i]); end.