Вариант 1 Задание 1. Построить блок-схему для решениязадачи со следующими условиями:1) Если значение исходного числа больше5, то результатом будетпротивоположное число;2) Если значение исходного числаменьше 5, то результатом будетКвадрат исходного числа3) Если значение исходного числа равно 5, то результатом будет исходное число.Задание 3. Построить блок схему для решенияследующей задачи: необходимо вычислитьсумму 1+2+3+...+(N-1), если N=10​

// PascalABC.NET 3.3, сборка 1611 от 06.01.2018
// Внимание! Если программа не работает, обновите версию!
begin
var a:= ArrRandom(10, -100, 100);a.Println;
Writeln('Количество отрицательных элемнтов -> ', a.Where(t -> t < 0).Count);
Writeln('Сумма отрицательных элеменов ->', a.Where(t -> t < 0).Sum);
Writeln('Среднее значение положительных элементов ->', a.Where(t -> t > 0).Average);
if a.Where(t -> t > 0).Count > 0 then
  Writeln('Максимальное положительное значение -> ', a.Where(t -> t > 0).Max)
else Writeln('Положительных чисел нет');

end.