lama_byterun/regression/test010.expr
2018-03-11 22:30:01 +03:00

18 lines
166 B
Text

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