Информатика, опубликовано 2018-08-22 23:18:45 by Гость

Помогите решить задачу в Pascal Дан массив целых чисел, состоящий из 30 элементов. Заполнить его датчиком случайных чисел. Найти сумму отрицательных элементов.

Ответ оставил Гость

// PascalABC.NET 3.1, сборка 1204 от 24.03.2016
begin
  var a:=ArrRandom(30,-20,20); a.Println;
 Writeln(s=,a.Where(x->xend.

Тестовое решение:
7 9 9 -17 -20 -4 -16 4 -1 2 20 -5 -14 -1 10 -11 14 -12 -14 10 9 18 9 -18 3 16 7 -11 17 -10
s=-154

Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.

Форма вопроса доступна на полной версии этой страницы.