99 Bottles of Beer/Pascal: Difference between revisions
m
Fixed syntax highlighting.
Thundergnat (talk | contribs) m (Avoid miscounting task entries twice) |
m (Fixed syntax highlighting.) |
||
Line 1:
<!--
===Pascal===
-->
{{collection|99 Bottles of Beer}}
Line 6:
__toc__
<span style='font-family: "Linux Libertine",Georgia,Times,serif;font-size:150%;'>[[Component Pascal]]</span><hr>
BlackBox Component Builder
<
MODULE BottlesOfBeer;
IMPORT StdLog;
Line 35 ⟶ 32:
END Sing;
END BottlesOfBeer.
</syntaxhighlight>
Execute: ^Q BottlesOfBeer.Sing<br/>
Output:
Line 69 ⟶ 66:
:''Or
<
{$APPTYPE CONSOLE}
Line 95 ⟶ 92:
End ;
end.</
<span style='font-family: "Linux Libertine",Georgia,Times,serif;font-size:150%;'>[[Pascal]]</span><hr>
<
var
Line 124 ⟶ 121:
writeln('No more bottles of beer on the wall');
end
end.</
| |||