
Viegsak
4 год назад
Дано натуральное число n. Составить программу вычисления значения выражения. Результат округлить до сотых.

ОТВЕТЫ

Юлий
Oct 24, 2020
begin
var n:=ReadInteger('n=');
if n<=0 then Writeln('s=0')
else begin
var ssin:=sin(1);
var s:=1/ssin;
for var i:=2 to n do begin ssin+=sin(i); s+=1/ssin end;
Writeln('s=',s:0:2)
end
end.
n= 5
s=8.85
90
Нужен срочно ответ?
1 Зарегистрируйся
2 Пополни баланс баллов
3 Назначь баллы за ответ
Чем больше баллов, тем выше веротяность скорого ответа
Смежные вопросы: