Даны произвольные числа a,b,c.Сообщить можно ли постоить треугольник с такми длинами сторон - VB
Формулировка задачи:
Даны произвольные числа a,b,c.Сообщить можно ли постоить треугольник с такми длинами сторон, и если можно то вывести соответствующее сообщение в зависимости от того, равносторонний это треугольник,равнобедренный,или прямоугольный....
Нужен код, разработка окна приложения...,схема алгоритма...Спрасибо буду очень признателен если вышлете на мыло..(removed@mail.ru)
Решение задачи: «Даны произвольные числа a,b,c.Сообщить можно ли постоить треугольник с такми длинами сторон»
textual
Листинг программы
max = a if b>max then max=b if c>max then max=c If a+b+c - max*2 > 0 then msgbox "Mojno" else msgbox "Nelza" end if if a=b and a=b then msgbox "Ravnobedrenniy" if a*a+b*b+c*c - 2*max*max = 0 then msgbox "Pramougol'niy" if a=b or b=c or a=c then msgbox "Ravnostoronniy"