Question

Дана числовая последовательность $\frac{1}{sin1}, \frac{1}{sin2}, \frac{1}{sin3}$, ...
Найти сумму членов с m по n включительно. Провести отладку для программы. m=10 n=25. Ответ: s= -111.92.
ПОМОГИТЕ НАПИСАТЬ ПРОГРАММУ НА ПАСКАЛЕ!

Answer 1

//PascalABC.NET
//Версия 3.3, сборка 1634
begin
var (m,n):=ReadInteger2;
write('s=',SeqGen(n-m,x->1/sin(x),m).Sum:0:2);
end.

отладка:
10 25
s=-111.92