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