Сделайте задачу ** PascalABC где проверяется равнобедренный ли треугольник или нет!Срочно...

0 голосов
30 просмотров

Сделайте задачу на PascalABC где проверяется равнобедренный ли треугольник или нет!Срочно плз!


Информатика | 30 просмотров
0

А что задано, длины сторон, или координаты вершин треугольника?

Дан 1 ответ
0 голосов
Правильный ответ

Uses crt;
var a,b,c : real;
// это стороны треугольника
begin

readln(a);
readln(b);
readln(c);
//ввод
if (a=b) or (a=c) or (b=c) then writeln('треугольник равнобедренный');
if (a=b) and (a=c) then writeln ('равносторонний');
end.

(446 баллов)
0

а если просто убрать строчку с crt ?