LiFT

program LiFT;

uses CRT;
Const hl=8; dv=10; d=87; g=75; max= 500;
Var  a,b,c:integer;

BEGIN
Writeln('Vvesty kilkist hlopciv');
Read(a);
b:=a*8;
if  b < 500 then writeln('yes') else writeln('no');
END.