lama_byterun/regression/test033.expr
2019-09-29 02:47:07 +03:00

17 lines
No EOL
218 B
Text

local x;
fun test (n, m) {
local i, s;
s := 0;
for i := 0, i <= n, i := i + 1 do
s := s + i;
if s > m then return s fi
od;
return s
}
x := read ();
write (test (10, 100));
write (test (100, 10))