Напишите программу на языке программирования Pascal. Дано натуральное число m.
Вычислить:
[tex] \frac{1}{sin1} + \frac{1}{sin2} + ... + \frac{1}{sinm} [/tex]
Вычислить:
[tex] \frac{1}{sin1} + \frac{1}{sin2} + ... + \frac{1}{sinm} [/tex]
Answers & Comments
Verified answer
Program sinys;var m,i:integer;x:real;mas:array [1..1000] of integer;
begin
x:=0;
readln(m);
for i:=1 to m do
x:=x+(1/sin(i));
writeln(x)
end.