Помогите решить задачу по информатике с помощью PascalABC.NET

Question

Помогите решить задачу по информатике с помощью PascalABC.NET

---

Comments

Два угла даны?

---

нет

---

А что тогда дано?

---

Написано же - даны углы. Один - мало, три - один лишний...

---

угол вводим с клавиатуры

---

Да, безусловно) Дальше можете не писать, Ваш уровень знаний я уже понял.

---

если я не разбираюсь в информатике это не о чем не говорит

---

Я как раз и имею в виду Ваш уровень знаний по информатике. И не в плане насмешки, а в лишь в части того, что смысла нет писать дальше Вам, потому что знаний у Вас недостаточно, чтобы толково объяснить. В таких случаях лучше ориентироваться на написанное условие. Вот и все.

Answer 1

// PascalABC.NET 3.4, сборка 1767 от 27.08.2018

// Внимание! Если программа не работает, обновите версию!

begin

var (a, b) := ReadReal2('Введите два угла треугольника в градусах:');

var c := 180 - a - b;

var mx := Max(a, Max(b, c));

if mx > 90 then Print('Тупоугольный')

else

if mx = 90 then Print('Прямоугольный')

else Print('Отстроугольный')

end.