Anonymous user
99 Bottles of Beer/Pascal: Difference between revisions
m
→{{header|Pascal}}: the special case really should be second
m (→{{header|Pascal}}: indentation changes) |
m (→{{header|Pascal}}: the special case really should be second) |
||
Line 106:
begin
for i := 99 downto 1 do
if i
begin▼
writeln('One bottle of beer on the wall');▼
writeln('One bottle of beer');▼
writeln('Take one down, pass it around');▼
writeln('No more bottles of beer on the wall');▼
end▼
else▼
begin
writeln(i, ' bottles of beer on the wall');
Line 123 ⟶ 116:
writeln(i - 1, ' bottles of beer on the wall');
writeln;
end
▲ else
▲ begin
</lang>▼
▲ writeln('One bottle of beer on the wall');
▲ writeln('One bottle of beer');
▲ writeln('Take one down, pass it around');
▲ writeln('No more bottles of beer on the wall');
▲ end
▲end.</lang>
|