Существует ли треугольник с заданными сторонами - QBasic
Формулировка задачи:
Напишите программу, которая позволяет выяснить существует ли треугольник с заданными сторонами (используйте неравенство треугольника). Длины сторон вводятся пользователем с клавиатуры
Решение задачи: «Существует ли треугольник с заданными сторонами»
textual
Листинг программы
CLS INPUT "vvedite a ", a INPUT "vvedite b ", b INPUT "vvedite c ", c IF a <= b + c AND b <= a + c AND c <= a + b THEN PRINT "sushestwuet" ELSE PRINT "ne sushestwuet" END IF PRINT a, b, c
Объяснение кода листинга программы
CLS- очистка экранаINPUTvvedite a, a- ввод значения переменнойaс помощью функцииINPUTINPUTvvedite b, b- ввод значения переменнойbс помощью функцииINPUTINPUTvvedite c, c- ввод значения переменнойcс помощью функцииINPUTIF a <= b + c AND b <= a + c AND c <= a + b THEN- проверка условия существования треугольника с помощью логических операцийANDи<=PRINTsushestwuet` - вывод сообщениясуществует` в случае выполнения условияELSE- альтернативный блок кода в случае невыполнения условияPRINTne sushestwuet` - вывод сообщенияне существует` в случае невыполнения условияEND IF- завершение условного блока кодаPRINT a, b, c- вывод значений переменныхa,b,c