12 lines
289 B
Ada
12 lines
289 B
Ada
with Ada.Text_IO;
|
|
|
|
procedure Main is
|
|
Lessons_Done : Natural := 0;
|
|
begin
|
|
Ada.Text_IO.Put_Line ("Ang una kong sesyon ng pag-aaral sa Agila");
|
|
Lessons_Done := Lessons_Done + 1;
|
|
if Lessons_Done = 1 then
|
|
Ada.Text_IO.Put_Line ("Natapos ang isang aralin");
|
|
end if;
|
|
end Main;
|