lama_byterun/regression/test010.expr

21 lines
183 B
Text
Raw Normal View History

global i, s, j;
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)