Question

помогите срочно надо СОР по информатике 4 задание

Answer 1

Program Treug;
Var a,b: real;
Begin;
writeln('Введите a и b');
readln(a,b);
writeln('Площадь треугольника: ' a*b);
writeln('Периметр треугольника:' 2*(a+b);
End.

вот легкий код