[omegaotaku]

data: c(80),
ind type numc length 2.

ind = 1.

while (ind le 10)
if ind eq 10.
concatenate 'texto' ind into c.
else.
concatenate 'texto0' ind into c.
endif.
ind = ind + 1
endwhile.