pascal - программирование математики
| Тригономические функции ожидают результат в радианах. Для перевода градусов в радианы нужно градусы умножить на число Пи и поделить на 180 градусов. В языке Pascal число Пи так прямо и пишется - Pi. |
Вычисление синуса.
program task_06_sinus; var a: integer; R: real; begin readln( a ); // вводим значение в градусах R := sin( a * Pi / 180 ); // переводим значение в радианы writeln( 'sinus = ', R:7:3 ); end.