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

вот еще одна на всякий:

program a1; var x,y,z,p:real; begin write('Vvedite razmer pervogo kateta:'); readln(x); write('Vvedite razmer vtorogo kateta:'); readln(y); write('Vvedite razmer ugla mezhdu nimi:'); readln(z); p:=(x*y*sin(z))/2; writeln('Ploshad ravna:',p:6:2); readln; end.

program s;uses crt;var s,h,a:real;beginclrscr;writeln('введите основание и высоту через пробел');readln(a,h);s:=0.5*a*h;writeln('s= ',s);readkey;end.при вводе 2 и 5 площадь будет равна 5