Files
lci/bin/sum.miniimp

9 lines
131 B
Plaintext
Raw Normal View History

def main with input in output out as
x := in;
out := 0;
while not x < 0 do (
out := out + x;
x := x - 1;
);
skip