Dze je subor www.TrSek.com/zadania/strany3.pas{ STRANY3.PAS Copyright (c) Pheo }
{ Test rovnoramenného trojuholníka. }
{ }
{ Datum:04.10.1999 http://www.trsek.com }
program strany3;
var a,b,c:integer;
begin
writeln;
write('Zadaj a,b,c');
read (a,b,c);
if(a+b>c) and (b+c>a) and (c+a>b) then writeln
('Cisla mozu tvorit strany trojuholnika') else writeln
(' cisla nemozu tvorit strany trojuholnika');
if ((a=b) and (a+b>c) and (b+c>a) and (c+a>b) or
(b=c) and (a+b>c) and (b+c>a) and (c+a>b) or
(a=c) and (a+b>c) and (b+c>a) and (c+a>b)) then writeln
('Trojuholnik je rovnoramenny');
readln;
end.