-- /usr/users/brock/431/progs/taskt2.ada

with TEXT_IO ;

package body TASKS2 is

task body print5 is
  I: NATURAL ;
begin
  for I in 1..10 loop
    accept printit do
      TEXT_IO.PUT_LINE("I am number five.") ;
    end printit ;
  end loop ;
end print5 ;   

task body print6 is
  I: NATURAL ;
begin
  for I in 1..10 loop
    accept printit do
      TEXT_IO.PUT_LINE("I am number six.") ;
    end printit ;
  end loop ;
end print6 ;

end TASKS2 ;