↓Skip to main content

Basic Ada

·
Table of Contents

Hello World 1 #

Hello world standard version.

pragma License (Gpl);
pragma Ada_2022;

with Ada.Text_IO;

procedure Hello_World_1 is
begin
   Ada.Text_IO.Put_Line ("Hello World!");
end Hello_World_1;

Hello World 2 #

Hello world with package rename.

pragma License (Gpl);
pragma Ada_2022;

with Ada.Text_IO;

procedure Hello_World_2 is
   package IO renames Ada.Text_IO;
begin
   IO.Put_Line ("Hello World!");
   IO.New_Line;
   IO.Put_Line ("I am an Ada programm with package rename.");
end Hello_World_2;

Hello World 3 #

Hello world with package use.

pragma License (Gpl);
pragma Ada_2022;

with Ada.Text_IO;

procedure Hello_World_3 is
   use Ada.Text_IO;
begin
   Put_Line ("Hello World!");
   New_Line;
   Put_Line ("I am an Ada programm with package use.");
end Hello_World_3;

Hello World 4 #

Hello world with package use.

pragma License (Gpl);
pragma Ada_2022;

with Ada.Text_IO;
use Ada.Text_IO;

procedure Hello_World_4 is
begin
   Put_Line ("Hello World!");
   New_Line;
   Put_Line ("I am an Ada program with global package use.");
end Hello_World_4;

—————————————————————- {{{ ———- –: vim: set textwidth=0 nowrap tabstop=8 shiftwidth=3 softtabstop=3 expandtab : –: vim: set filetype=ada fileencoding=utf-8 fileformat=unix foldmethod=syntax : –: vim: set spell spelllang=en_gb :