Является ли треугольник равнобедренным?Даны три числа-стороны треугольника.Написать программу на языке Паскаль

2

Ответы и объяснения

2014-01-27T16:51:40+04:00
Var a, b, c: real; {стороны треугольника}
begin
write ('a='); read(a);
write ('b='); read(b);
write ('c='); read(c);
if (a=b) or (a=c) or (b=c) write ('Treugolnik ravnobedrenniy')
else write ('Treugolnik ne ravnobedrenniy');
end.





у тебя тоже есть маленький недочет
а хотя ладно главное что работает
Эта программа и не претендует на идеал. Она написана с расчетом на разбор решения. Я хотел все показать наглядно.
2014-01-27T16:54:12+04:00
Program test;
var a,b,c:real;
begin
readln(a,b,c);
if (a=c) or (a=b) or (c=b) then writeln('Треугольник равнобедренный')
else writeln('Треугольник не равнобедренный');
end.
но ведь твоя программа не работает
проверь
ну после того как ты её отредактировал, конечно она работать будет
тебе что то нужно еще ?
нет, спасибо что потратил на меня время