Регистрация
anyaadamchuk2
12.01.2020 23:42
Информатика
Есть ответ 👍

Делать только 18. Это программирование только вам нужно нарисовать структуру и расписать

223
480
Посмотреть ответы 1

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

subscribetome
subscribetome
4,8(41 оценок)

PascalABC.Net

begin  var n := ReadInteger('Введите длину массива');  var a := ArrRandom(n, -50, 50);  Println('Исходный массив');  a.Println;  a.Where(p -> p < 0).Average.Println;  a.Where(p -> p > 0).Average.Println; end.

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