Срочно!!! Напишите программу для вычисления площади и периметра треугольника по 2-м его сторонам.

Вопрос школьника по предмету Информатика

Срочно!!!
Напишите программу для вычисления площади и периметра треугольника по 2-м его сторонам.

Ответ учителя по предмету Информатика

1 var

2 a, b, c, u, s: real;

3 Beging

4 Witeln(‘Введите стороны A, B , угол через пробел:’);

5 readln(a, b, u);

6 c:= sqrt(sqr(a) + sqr(b) — 2 * a * b * cos(u * (pi / 180)));

7 s:= 0.5 * a * b * sin(u * (pi / 180));

8 Writeln(‘S: ‘, s:0:2);

writeln(‘P: ‘, a + b + c:0:2);

9 End.