Паскаль герон что здесь неверно? program geron; var a, b, c: integer; p, s: real; begin writeln('введите стороны треугольника a, b, c'); readln (a, b, c); p: =(a+b+c)/2; s: =sqrt(p*(p-a)*(p-b)*(p-c)); writeln('площадь треугольника s=', s); readln end.

mongoliya1    2   24.06.2019 05:40    1