Advertisement
allekco

Untitled

Nov 21st, 2019
159
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.20 KB | None | 0 0
  1. var
  2. a, b, c:real;
  3. begin
  4. readln(a,b,c);
  5. if ((a + b > 0) or (a + c > 0) or (b + c > 0)) then
  6. begin
  7. writeln('YES');
  8. end
  9. else
  10. begin
  11. writeln('NO');
  12. end;
  13. end.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement