Предмет:
ИнформатикаАвтор:
weber//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
Автор:
donaldsteeleДобавить свой ответ
Предмет:
Другие предметыАвтор:
asunciónogvwОтветов:
Смотреть