Дано натуральное число N. Вычислить S=1/sin1+1/sin2+....+1/sinN. Надо написать на Паскале

Дано натуральное число N. Вычислить S=1/sin1+1/sin2+....+1/sinN. Надо написать на Паскале
Гость
Ответ(ы) на вопрос:
Гость
var s: real;     i, c: integer; begin      readln(c);      for i := 1 to c do          s := s + 1 / sin(i);      writeln(s); end. =)
Не нашли ответ?
Ответить на вопрос
Похожие вопросы