uses Windows; {$apptype console} var d: double; si: Real; begin repeat readln(d); si:=d; writeln(d:26); until d=0 end.