This commit is contained in:
@@ -0,0 +1,14 @@
|
||||
program FizzBuzz(output);
|
||||
var
|
||||
i: Integer;
|
||||
begin
|
||||
for i := 1 to 100 do
|
||||
if i mod 15 = 0 then
|
||||
WriteLn('FizzBuzz')
|
||||
else if i mod 3 = 0 then
|
||||
WriteLn('Fizz')
|
||||
else if i mod 5 = 0 then
|
||||
WriteLn('Buzz')
|
||||
else
|
||||
WriteLn(i)
|
||||
end.
|
||||
Reference in New Issue
Block a user