FizzBuzz: Difference between revisions

Content deleted Content added
Added an Algol W sample
Line 509:
or simply:
<lang algol68>FOR i TO 100 DO print(((i%*15=0|"FizzBuzz"|:i%*3=0|"Fizz"|:i%*5=0|"Buzz"|i),new line)) OD</lang>
 
=={{header|ALGOL W}}==
<lang algolw>
begin
i_w := 1; % set integers to print in minimum space %
for i := 1 until 100 do begin
if i rem 15 = 0 then write( "FizzBuzz" )
else if i rem 5 = 0 then write( "Buzz" )
else if i rem 3 = 0 then write( "Fizz" )
else write( i )
end for_i
end.
</lang>
 
=={{header|APL}}==