WITH ada.text_io;
   WITH ada.integer_text_io;
    PROCEDURE io_demos IS
   BEGIN 
      WHILE NOT ada.text_io.end_of_file LOOP  -- reads from keyboard until out of data
         NULL;
      END LOOP;
   
   
      LOOP   --  use when don't know amount of data 
       --  use when don't want to read all of the data
       --  use when you know what will happen that ends the loop
         NULL;
         EXIT WHEN ada.text_io.end_of_file ;  --CONDITION 
      END LOOP;	

   -- in YOUR programs (contest.adb)  use
   -- programmer(x) number lines of code >= 1000;
   -- don't use end_of_file


   -- 2 ways to write a LOOP  ... EXIT ... LOOP   
   LOOP 
      IF 6 > 3 THEN
   	   EXIT;
      END IF;
   END LOOP;
   
   LOOP 
      EXIT WHEN 6 > 3;
   END LOOP;
   
   
 END io_demos;