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