СИ-2014

[Костягина Вера]

Сообщение от zfatima

3-500 кот для ПШ. «Откуда родом?» 500
Узнана Мария Шарапова. Ш+

Всем любителям КВНа вообще и конкретно команды "Кефир", а также поклонникам Дарьи Домрачевой ну и, конечно, самой М. Шараповой, известно, что родом она всё же из города Нягань, равно как и "Кефир" с Домрачевой, а вовсе не из Сочи

[SchodingersCatt]

uses crt;
var s,si,x:real;
i,n:integer;
function fact(x:integer):longint;
begin
if (x=1) or (x=0) then fact:=1 else fact:=fact(x-1)*x;
end;
begin
write('x = ');readln(x);
repeat
write('n>0, n = ');readln(n);
until n>0;

s:=0;
for i:=1 to n do
begin

si:=Power(-1,i+1)*Power(x,2*i-1)/fact(2*i-1);
s:=s+si;
end;
writeln('s = ',s:0:5,', sin(',x:0:2,') = ',sin(x):0:5);
end.