Паскаль.
Написать программу для нахождения площади прямоугольника.
формулы y1=(x+y)/3-t

Ответ:

Program lol;

Var a, b, c, s, p:real;

begin

 write('Введите длины трех сторон треугольника: ');

readln(a,b,c);

 p := (a + b + c) / 2;

 s := sqrt(p * (p-a) * (p-b) * (p-c));

 writeln('Площадь тр-ка S = ', s);

end.

Объяснение: