Задание:
Вычислить площадь треугольника через программу Pascal ABC
Решение:
vara,b,c,p: real; beginread (a,b,c); p: =(a+b+c) /2; p: =sqrt (p*(p-a)*(p-b)*(p-c); writeln ('S=',p); end.
Знаете другой ответ?
Вычислить площадь треугольника через программу Pascal ABC
vara,b,c,p: real; beginread (a,b,c); p: =(a+b+c) /2; p: =sqrt (p*(p-a)*(p-b)*(p-c); writeln ('S=',p); end.
Знаете другой ответ?