Синус и радианы

[Вадим Буренков]

Мне нужно вычесть синус из числа. Я делаю так

Gradus:=Sin(80);

получается примерно -0,99388......, а в калькуляторе 0,9848....
Я где-то слышал что это связано с радианами и что нужно переводить в градусы но ничего не получается.
Что я делаю не так?

[Sazary]

Да, нужно перевести в радианы.
Угол в градусах - Grad, в радианах - Rad

Rad = Grad * PI / 180

uses crt;
var gradus : real;
 ugol : real;
begin
clrscr;
ugol := 80;
ugol := ugol *pi/180;
gradus := sin(ugol);
writeln(gradus);

readln;
end.

[Вадим Буренков]

Спасибо большое.