Напишите программу, которая вычисляет площадь треугольника, с клавиатуры вводятся длины двух сторон и угол градусов между ними. Язык: Pascal

program CrazyCoder;

var

a, b, c, s: real;

begin

writeln ('Введите первую сторону: ');

read (a);

writeln ('Введите вторую сторону: ');

read (b);

writeln ('Введите величину угла: ');

read (c);

c : = DegtoRad (c);

s : = 0.5 * a * b * sin (c);

writeln ('Прощадь треугольника равна: ', s, ' кв. см');

end.