program ideone;
var
    a: Integer;  
begin 
    a:= 150;  
    if a in [100..255] then  
        WriteLn ('YES1')
    else  
        WriteLn ('NO1');
        
    if a in [100..256] then  
        WriteLn ('YES2')    
    else  
        WriteLn ('NO2');
end.
