Program Pzim ;
const pi=3.14;
var x, gra:real;

Function rad(grad:real):real;
Begin
	rad:=grad*pi;
end;	
	 
 Begin
 	writeln('Introduza os graus que quer converter em radianos);
 	read(gra);
 	x:=rad(gra);
 	writeln(x);
 End.