Cacher is the code snippet organizer for pro developers

with Ada.Integer_Text_IO;
with Ada.Text_IO;
procedure Multiplication_Tables is
  use Ada.Integer_Text_IO;
  use Ada.Text_IO;
begin
  Put_Line("Multiplication Tables");
  Put_Line("_____________________");
  New_Line;
  for i in 1..10 loop
    for j in 1..10 loop 
      Put(i); Put(" * "); Put(j); Put(" = "); Put(i*j); New_Line;
    end loop;
    Put_Line("-----");
  end loop;
end Multiplication_Tables;