Дано значение угла α в радианах (0 ≤ α < 2·π). Определить значение этого же угла в градусах, учитывая, что (программа Паскаль)

Question

Дано значение угла α в радианах (0 ≤ α < 2·π). Определить значение этого же угла в градусах, учитывая, что 180° = π радианов. В качестве значения π использовать 3.14

Answer 1

const
pi = 3.14;

var
Alpha, gradus: real;

begin
writeln('Введите радианную меру угла(0 <= Alpha < 6.28):');
write(' Alpha = ');
readln(Alpha);
writeln;
gradus := 180 * Alpha / pi; { <-- Вычисляем градусную меру угла }
writeln('Результат:');
writeln(' Угол ', Alpha, ' радиан составляет ',
gradus:0:2, ' градусов.');
readln
end.