Перевод градусов в радианы - что-то не то происходит

@lartia · Регистрация: 09.06.2015

Author24 — интернет-сервис помощи студентам

Бодрого дня, господа.
Столкнулся с не понятной для меня ситуацией.
Для того, чтобы вычислить какую-либо тригонометрическую функцию, в паскале необходимо градусы перевести в радианы.
А для этого я знаю 2 варианта:
1) использовать функцию gradtorad из подключаемого модуля math;
2) градусы умножаем на число Пи и делим на 180.

Демонстрирую:

Pascal

program proba;
uses сrt,math;
var a,a_1,a_2 :real;
begin
    write('a: ');
    readln (a);
    a_1:=gradtorad(a);
    writeln('первый вариант: ',a_1:5:5);
    writeln(sin(a_1):5:5);
    writeln('---------------');
    writeln(pi);
    a_2:=a*pi/180;
    writeln('второй вариант: ',a_2:5:5);
    writeln(sin(a_2):5:5);
end.

Да вот незадача получается. А получается, что получаются разные результаты.
Как же ж так получается? Или я чего-то не правильно делаю?

@volvo · 09.08.2017, 16:28

gradtorad переводит грады, а не градусы (200 град = pi), а чтобы превести градусы - это degtorad

@lartia · 09.08.2017, 16:37 **[ТС]**

Вот я старый пень. Перепутал и, вместо того, чтобы посмотреть/подумать, сразу пузыри пускаю. Спасибо.

@volvo Супер-модератор 32835 / 21172 / 8148 Регистрация: 22.10.2011 Сообщений: 36,432 Записей в блоге: 8
	09.08.2017, 16:28	2
	gradtorad переводит грады, а не градусы (200 град = pi), а чтобы превести градусы - это degtorad 0

@lartia 68 / 2 / 0 Регистрация: 09.06.2015 Сообщений: 210
	09.08.2017, 16:37 [ТС]	3
	Вот я старый пень. Перепутал и, вместо того, чтобы посмотреть/подумать, сразу пузыри пускаю. Спасибо. 0