Определить,является ли треугольник со сторонами a,b,c равнобедренным. (** языке ABC...

Question

Определить,является ли треугольник со сторонами a,b,c равнобедренным.
(На языке ABC Pascal)

Answer 1

Var a, b, c: integer;
begin
    write (' Введите три стороны: ');
    readln (a, b, c);
    if (a < b+c) and (b < a+c) and (c < a+b) then
    begin
    if (a=b) or (a=c) or (b=c) then
      writeln('Треугольник равнобедренный')
    else
      writeln('Треугольник не является равнобедренным');
    end
    else
      writeln ('Треугольник не существует.');
end.

Comments

первый пример я не могу поправить уже, в блоке var поставь в начале не integer, а real, как во вотором примере

---

равносторонний это if (a=b) and (a=c) and (c=b) then

---

Запишите пожалуйста не для равносторонеего а для равнобедренного.

---

какой равносторонний? я для равностороннего ничего нигде не делал

---

А какая разница,если мы поменяем местами (b=c) и (c=b)

---

обрати внимание на OR и AND

---

никакой разницы

---

Извините,кто-то,кажется без глаз.

---

Если вам не составит труда, сможете сделать вторую задачу?

---

https://znanija.com/task/27102184