PROGRAM EXPONZ; VAR PI, SPI :REAL; BEGIN READ(PI); WRITELN(PI); END.