1.Написать программу, которая вычисляет сумму отрицательных элементов одномерного массива. массив из 15 целых элементов.
2. Написать программу которая вычисляет сумму положительных элементов одномерного массива. массив из 12 вещ элементов
паскаль, прошу вас, помогите
vitali313:
паскаль
Ответы на вопрос
Ответил BobbyFresnel
1
===== PascalABC.NET =====
begin
// 1
var a := ArrRandom(15, -99, 99);
a.Println.Where(p -> p < 0).Sum.Println;
Writeln; // только как разделитель между заданиями
// 2
var b := ArrRandomReal(12, -99, 99);
b.Println.Where(p -> p > 0).Sum.Println
end.
Приложения:

Новые вопросы
Литература,
1 год назад
Геометрия,
1 год назад
Алгебра,
2 года назад
Математика,
2 года назад
Алгебра,
7 лет назад