Borland Pascal. Помощь 9 класс)

[mMAg]

S := sqrt(sqr(x2-x1) + sqr(y2-y1));

Площадь прямоугольника считается не так, а вот так:

S:= sqrt(sqr(x2-x1) + sqr(y2-y1))*sqrt(sqr(x1-x3) + sqr(y1-y3))

Проверок на некорректный ввод вообще нет...

[netrino]

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

S := sqrt(sqr(x2-x1) + sqr(y2-y1));

Площадь прямоугольника считается не так, а вот так:

S:= sqrt(sqr(x2-x1) + sqr(y2-y1))*sqrt(sqr(x1-x3) + sqr(y1-y3))

Пардон, действительно, исправил.

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

Проверок на некорректный ввод вообще нет...

Ну это как сказать... на вводе задаются конкретные точки(верхняя левая, правая левая и т.д.), так что естественно, что правая верхняя не может быть по иксу меньше левой верхней. Да и вообще, без проверок можно будет ввести произвольную фигуру(включая треугольники или даже просто одну точку).