Пример элементарной программы

Пожалуй, более элементарную программу придумать не возможно:

with System.Machine_Code; use System.Machine_Code;

procedure Nothing is

begin

Asm ("nop"); end Nothing;

Не составит труда догадаться, что эта программа состоит из единственной инструкции ассемблера nop, которая действительно ничего не делает.