with Ada.Text_IO, Ada.Integer_Text_IO;
 use Ada.Text_IO, Ada.Integer_Text_IO;

procedure main is
   S: Integer;
   W: Integer;
begin
   get(S);
   get(W);
   if (W >= S) then put_line("unsafe");
   else put_line("safe");
   end if;
end main;