Question

Составьте программу на языке Паскаль: Вводится величина угла в градусах. Найти его sin и cos. (Напомним, что в Паскале аргумент тригонометрических функций задается в радианах).

Answer 1

program n_5;
var
  a, b: real;
begin
  write('Введите значение угла в градусах - ');read(a);
  b := (a / 57.295779513);
  writeln('Значение угла в радианах - ', b);
  writeln('Синус угла = ', sin(b));
  writeln('Косинус угла = ', cos(b));
end.