Pascal :

var
 a:integer;
begin
 readln(a);
 if a>=90 then writeln('outstanding')
          else if a<=60 then writeln('unsatisfactory')
                        else writeln('satisfactory');
end.