lama_byterun/regression/test010.expr
2019-09-22 20:15:15 +03:00

20 lines
185 B
Text

global i, s;
i := 0;
s := 0;
while i < 100
do
local j = 0;
while j < 100
do
s := s + j;
j := j + 1
od;
s := s + i;
i := i + 1
od;
write (s)