var a,b,c,d,e,g:longint; f:real; begin read(a,b,c,d,e); f:=a/b+c+d+e; if f<=20 then write('YES') else write('NO'); end. /************************************************************** Problem: 1634 User: admin Language: Pascal Result: Wrong Answer ****************************************************************/