Составить программу осуществляемую перевод величин из радианы в градусную меру или наоборот.

varx: integer;function R(n: integer): real;beginR:=n*3.14/180;end;beginreadln(x);writeln(x, ' градусов = ', R(x), ' рад.');end.