Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- program otsechki; // v triygylnik
- var
- a : real;
- b: real;
- c: real;
- begin
- writeln ('Enter a: ');
- readln(a);
- writeln ('Enter b: ');
- readln(b);
- writeln ('Enter c: ');
- readln(c);
- if(a+b>c) and(a+c>b) and (b+c>a) then
- begin
- writeln('True');
- end
- else
- begin
- writeln('False');
- end
- end.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement