Question

sa se scrie un program care citeste trei numere reale si verifica daca aceste numere pot fi lungimile laturilor unui triunghi

PASCAL

Answer 1

Răspuns:

program T;

var a,b,c:integer;

begin

write('a='); readln(a);

write('b='); readln(b);

write('c='); readln(c);

if (a>0) and (b>0) and (c>0) and (a+b>c) and (b+c>a) and (a+c>b) then

begin

write('true');

end

else write('false');

end.