>cName = "Zakaria" >DIMENSION aLetters(LEN(cName)) >FOR i=1 to LEN(cName) > aLetters[i] = SUBSTR(cName,i,1) >? aLetters[i] + CHR(13) >ENDFOR>
>>cName = "Zakaria" >>DIMENSION aLetters(LEN(cName)) >>i = 0 >>FOR EACH cLetter IN aLetters >> i = i + 1 >> aLetters[i] = SUBSTR(cName,i,1) >> ? aLetters[i] + CHR(13) >>ENDFOR >> >> >>>>