Вычислить все значения и найти сумму вычисленных элементов для y=c-a, если а=2, шаг=1 и с принадлежит [-1,57; 1,57]

Question

Информатика

Трифилий

20 января, 05:42

Вычислить все значения и найти сумму вычисленных элементов для y=c-a, если а=2, шаг=1 и с принадлежит [-1,57; 1,57]

+2

Ответы (1)

Знаете ответ?

Каля · Answer 1

Var

c, y, a, h, s: real;

begin

a : = 2.0;

h : = 1.0;

c : = - 1.57;

repeat

y : = c - a;

writeln (c:7:2, ' ', y:7:2) ;

s : = s + y;

c : = c + h;

until c > 1.57;

writeln (s) ;

end.