FizzBuzz: Difference between revisions
PascalABC.NET
(→{{header|Ed}}: Fix a typo in tag name) |
(PascalABC.NET) |
||
Line 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}}==
| |||