const fi='tong.inp';
fo='tong.out';
var s1,s2,x:real;
gthua,t:longint;
f1,f2:text;
i,n:byte;
begin
assign(f1,fi);reset(f1);
assign(f2,fo);rewrite(f2);
gthua:=1;s1:=0;s2:=1;t:=1;
repeat
readln(f1,n);
until (1<n) and (n<100);
repeat
readln(f1,x);
until (0<x) and (x<15);
for i:=1 to n do
begin
gthua:=gthua*i;
t:=t*x;
s1:=s1+(1/gthua);
if i mod 2 = 0 then s2:=s2+t/gthua
else s2:=s2-t/gthua;
end;
writeln(f2,s1:0:2);
writeln(f2,s2:0:0);
close(f1);close(f2);
end.
