|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
||||
|
||||
Я нуб и прошу помощь=)
Доброго вечера, Форумчане!=)
Сейчас получил ТЗ - составить программу для школьников по начертательной геометрии и столкнулся с небольшой проблемкой - надо создать кнопку проверки на определение существования треугольника. В принципе задача лёгкая, но Код:
if IntToStr(StrToInt(edit1.text))<IntToStr(StrToInt(edit2.Text)+ StrToInt(edit3.Text)) then begin if IntToStr(StrToInt(edit2.text))<IntToStr(StrToInt(edit1.Text)+ StrToInt(edit3.Text)) then begin if IntToStr(StrToInt(edit3.text))<IntToStr(StrToInt(edit2.Text)+ StrToInt(edit1.Text)) then Label1.Caption:='Треугольник существует' else Label1.Caption:='Треугольник не существует'; end else Label1.Caption:='Треугольник не существует'; end else Label1.Caption:='Треугольник не существует'; Заранее спасибо, Лунтик. |
#2
|
||||
|
||||
Бррррр.
Я так понимаю вы хотите сравнить координаты вершин треугольника т.е. числа? Тогда зачем-же вы сравниваете строки? Жизнь такова какова она есть и больше никакова. Помогаю за спасибо. |
#3
|
||||
|
||||
А, извиняюсь, забыл сказать - Используем модель треугольника, без его построения) Просто нужно узнать, существует он или нет.
Формулы: a<b+c b<a+c c<a+b насколько я помню...) |
#4
|
|||
|
|||
Т.е. задача - можно ли построить из 3 отрезков треугольник, так? Отрезки задаются длинной, так?
|
#5
|
||||
|
||||
Так) Примерно так я и хотел обьяснить, но в силу сввоей необразованности не смог) Есть какие-то задумки?
|
#6
|
||||
|
||||
Да не суть важен алгоритм, вы сравниваете не числа, а строки. Зачем вы число перегоняете обратно в строку перед сравнением?
Вы что количеством символов введенных в Edit1,Edit2,Edit3 задаете длину сторон? Жизнь такова какова она есть и больше никакова. Помогаю за спасибо. |
#7
|
||||
|
||||
Можно немного подробнее?
Как именно записать чтобы было ЧИСЛО1< ЧИСЛО2+ЧИСЛО3? То, что стороны я задаю строкой, а не числами я догадываюсь, но вот как это изобразить в коде?=( |
#8
|
||||
|
||||
Да просто уберите преобразование из числа в строку и всех делов.
Код:
if StrToInt(edit1.Text)<StrToInt(edit2.Text)+StrToInt(edit3.Text) then begin if StrToInt(edit2.text)<StrToInt(edit1.Text)+StrToInt(edit3.Text) then begin if StrToInt(edit3.text)<StrToInt(edit2.Text)+StrToInt(edit1.Text) then Label1.Caption:='Треугольник существует' else Label1.Caption:='Треугольник не существует'; end else Label1.Caption:='Треугольник не существует'; end else Label1.Caption:='Треугольник не существует'; Жизнь такова какова она есть и больше никакова. Помогаю за спасибо. |
#9
|
||||
|
||||
Огромное спасибо=) Завтра буду дома - попробую, если будет работать - курсовая зачёт))
|