Execute HQ9+/Ada: Difference between revisions
Content added Content deleted
(Implemented Accumulator) |
m (Fixed syntax highlighting.) |
||
Line 1: | Line 1: | ||
{{implementation|HQ9+}}{{collection|RCHQ9+}} |
{{implementation|HQ9+}}{{collection|RCHQ9+}} |
||
< |
<syntaxhighlight lang="ada">with Ada.Text_IO; |
||
procedure HQ9Plus is |
procedure HQ9Plus is |
||
-- took example from bottle-task |
-- took example from bottle-task |
||
Line 37: | Line 37: | ||
begin |
begin |
||
Interpret_HQ9Plus (Test_Code); |
Interpret_HQ9Plus (Test_Code); |
||
end HQ9Plus;</ |
end HQ9Plus;</syntaxhighlight> |