program project1;
{$APPTYPE CONSOLE}
//const n=3;
var
x,s,p,stx,e:real;
i,k,n:integer;
ch,zn:Extended;
begin
writeln('wwedite x');
readln(x);
writeln('wwedite e');
readln(e);
writeln('wwedite n');
readln(n);
s:=1;
p:=1;
for i:=1 to n do
begin
p:=p*(2*i-1)*sqr(x)/(2*i);
s:=s+p;
end;
writeln('summa= ',s:9:5);
s:=1;
stx:=sqr(x);
k:=1;
ch:=1;
zn:=2;
i:=2;
while ch*stx/zn>e do
begin
s:=s+ch*stx/zn;
k:=k+1;
inc(i,2);
zn:=zn*i;
ch:=ch*(i-1);
stx:=stx*sqr(x);
end;
writeln('summa= ',s:9:5);
writeln('kol-vo slag= ',k);
e:=e/10;
s:=1;
stx:=sqr(x);
k:=1;
ch:=1;
zn:=2;
i:=2;
while ch*stx/zn>e do
begin
s:=s+ch*stx/zn;
k:=k+1;
inc(i,2);
zn:=zn*i;
ch:=ch*(i-1);
stx:=stx*sqr(x);
end;
writeln('summa= ',s:9:5);
writeln('kol-vo slag= ',k);
writeln('tochnoe znach= ',1/sqrt(1-sqr(x)):9:5);
readln;
end.