Составить программку для вычисления площади треугольника по длинам двух сторон треугольника

Для вычисления площади нам пригодится значение одной и 2-ой стороны, а также значение угла меж ними.
Значения длин сторон и угла могут быть нецелыми, потому мы сделаем для их тип real. Это вещественный тип и дозволяет десятичную часть.
var storona1, storona2, ugol, ploshad : real;
begin
writeln(Введите по порядку величины 2-ух сторон, а затем угол меж ними);
read(storona1, storona2, ugol);
Сейчас нам необходимо будет перемножить все эти три величины, используя синус угла, и еще помножить на 1/2.
ploshad := storona1 * storona2 * sin(ugol) * 1/2;
writeln(Площадь одинакова, ploshad);
end.