Дана последовательность:
d(n) sinn; n 1, 2,..., 50.
Вычислить сумму всех элементов этой последовательности, удовлетворяющих
условию:
|d(n)|>0.5

ОТДЕЛ Задание+;ИСПОЛЬЗУЕТ Матем ИЗ "...\Отделы\Числа\";ПЕР  d: РЯД 50 ИЗ ВЕЩ;  n, сумма: ВЕЩ;  сч: ЦЕЛ;УКАЗ  n := 1.0; сумма := 0;  ОТ сч := 0 ДО РАЗМЕР(d) - 1 ВЫП    d[сч] := УЗК(Матем.sin(n));    n := n + 1.0;    ЕСЛИ МОДУЛЬ(d[сч]) > 0.5 ТО      сумма := сумма + d[сч]    КОН  КОНКОН Задание.