Кумир треугольник

[Dagestanov]

Напишите пожалуйста программу в кумире.

задание
Пусть даны координаты трёх точек на плоскости.Если они могут быть вершинами прямоугольного треугольника, вычислите его площадь.
Благодарен буду))

[rUs_LAN]

сломал себе голову но что-то написал

| использовать Робот
алг 
нач
| цел точка1Х, точка1У, точка2Х, точка2Y, точка3Х, точка3Y;
цел а, б, в
| ввод точка1Х, точка1У, точка2Х, точка2Y, точка3Х, точка3Y;
 ввод а, б, в
если а*а+б*б=в*в то вывод "прямоуголный"; вывод " площадь = "; вывод площадь(а, б, в); иначе вывод "не прямоугольный" все

кон

алг вещ площадь (вещ a, b, c)
дано a>=0 и b>=0 и c>=0
надо 
нач
вещ p
p := (a+b+c)/2 
знач := sqrt(p*(p-a)*(p-b)*(p-c)) 
кон

[Dagestanov]

Сообщение от rUs_LAN

сломал себе голову но что-то написал

| использовать Робот
алг 
нач
| цел точка1Х, точка1У, точка2Х, точка2Y, точка3Х, точка3Y;
цел а, б, в
| ввод точка1Х, точка1У, точка2Х, точка2Y, точка3Х, точка3Y;
 ввод а, б, в
если а*а+б*б=в*в то вывод "прямоуголный"; вывод " площадь = "; вывод площадь(а, б, в); иначе вывод "не прямоугольный" все

кон

алг вещ площадь (вещ a, b, c)
дано a>=0 и b>=0 и c>=0
надо 
нач
вещ p
p := (a+b+c)/2 
знач := sqrt(p*(p-a)*(p-b)*(p-c)) 
кон

Спасибо большое)