18 lines
240 B
Text
18 lines
240 B
Text
|
program define fizzbuzz
|
||
|
|
args n
|
||
|
|
forvalues i = 1/`n' {
|
||
|
|
if mod(`i',15) == 0 {
|
||
|
|
display "FizzBuzz"
|
||
|
|
}
|
||
|
|
else if mod(`i',5) == 0 {
|
||
|
|
display "Buzz"
|
||
|
|
}
|
||
|
|
else if mod(`i',3) == 0 {
|
||
|
|
display "Fizz"
|
||
|
|
}
|
||
|
|
else {
|
||
|
|
display `i'
|
||
|
|
}
|
||
|
|
}
|
||
|
|
end
|