Показать сообщение отдельно
  #7  
Старый 10.12.2013, 02:41
Аватар для angvelem
angvelem angvelem вне форума
.
 
Регистрация: 18.05.2011
Адрес: Омск
Сообщения: 3,970
Версия Delphi: 3,5,7,10,12,XE2
Репутация: выкл
По умолчанию

После каких проверок?
Здесь что ли?
Код:
if (a<0) or (b<0) or (c<0) then
begin
  Label1.Caption:=' Îäíà èç ñòîðîí îòðèöàòåëüíà!!!';
  Exit;
end;
if (a+b<c) or (b+c<a) or (a+c<b) then
begin
  Label1.Caption:='Íåëüçÿ ïîñòðîèòü òðåóãîëüíèê!!!!';
  Exit;
end;
__________________
Je venus de nulle part
55.026263 с.ш., 73.397636 в.д.
Ответить с цитированием