Составить программу осуществляемую перевод величин из радианы в градусную меру или наоборот.
Var
x: integer;
function R(n: integer): real;
begin
R:=n*3.14/180;
end;
begin
readln(x);
writeln(x, градусов = , R(x), рад.);
end.
Оцени ответ
