FizzBuzz: Difference between revisions
PascalABC.NET
(→{{header|Ed}}: Fix the markup) |
(PascalABC.NET) |
||
| (One intermediate revision by one other user not shown) | |||
Line 3,612:
=={{header|Ed}}==
<
a
100
Line 3,734 ⟶ 3,733:
,p
Q
</syntaxhighlight>
=={{header|Eero}}==
Line 7,917 ⟶ 7,916:
writeln(i)
end.</syntaxhighlight>
=={{header|PascalABC.NET}}==
<syntaxhighlight lang="delphi">
begin
for var i:=1 to 100 do
if i mod 15 = 0 then
Print('FizzBuzz')
else if i mod 3 = 0 then
Print('Fizz')
else if i mod 5 = 0 then
Print('Buzz')
else Print(i)
end.
</syntaxhighlight>
=={{header|PDP-8 Assembly}}==
| |||