Loops/Do-while: Difference between revisions
Content deleted Content added
→{{header|Scheme}}: ++ sather |
|||
Line 520:
puts val
end until val % 6 == 0</lang>
=={{header|Sather}}==
{{trans|C}}
<lang sather>class MAIN is
main is
val ::= 0;
loop
val := val + 1;
#OUT + val + "\n";
while!(val % 6 /= 0)
end;
end;
end;</lang>
=={{header|Scheme}}==
|