Задачи вида "Развилка" (Текстовые задачи) - QBasic

Формулировка задачи:

Здравствуйте, пожалуйста помогите написать проги в QBasic по решению задач: Задача №1 Даны два угла треугольника (в градусах). Определить, существует ли такой треугольник, и если да, то будет ли он прямоугольным. Задача №2 Программа — льстец. На экране высвечивается вопрос «Кто ты: мальчик или девочка? Введи Д или М». В зависимости от ответа на экране должен появиться текст «Мне нравятся девочки!» или «Мне нравятся мальчики!». Задача №3 Составить программу, определяющую, пройдет ли график функции у = ах2 + bх + с через заданную точку с координатами (т, n). P.S. Буду очень сильно благодарен, закрываю практику в универе

Решение задачи: «Задачи вида "Развилка" (Текстовые задачи)»

Листинг программы

CLS
INPUT "A,B = "; a, b
 
c = a + b
 
IF c < 180 THEN
   IF a = 90 OR b = 90 OR c = 90 THEN
      PRINT "YES, PRYAMOUGOLNYI"
   ELSE
      PRINT "YES, NE PRYAMOUGOLNYI"
   END IF
ELSE
   PRINT "NO"
END IF
END

Объяснение кода листинга программы

CLS - очистка экрана
INPUTA,B = ; a, b - ввод значений переменных a и b с помощью функции INPUT, значения переменных a и b сохраняются в соответствующих ячейках памяти
c = a + b - переменная c равна сумме a и b
IF c < 180 THEN - проверка условия, если c меньше 180, то выполняется следующий блок кода
IF a = 90 OR b = 90 OR c = 90 THEN - проверка условия, если a равно 90, или b равно 90, или c равно 90, то выполняется следующий блок кода
PRINTYES, PRYAMOUGOLNYI` - вывод на экран строкиYES, PRYAMOUGOLNYI`
ELSE - если предыдущее условие не выполнено, то выполняется следующий блок кода
PRINTYES, NE PRYAMOUGOLNYI` - вывод на экран строкиYES, NE PRYAMOUGOLNYI`
END IF - конец блока проверки условия
ELSE - если предыдущее условие не выполнено, то выполняется следующий блок кода
PRINTNO` - вывод на экран строкиNO`
END IF - конец блока проверки условия
END - конец программы