SOLUTIONpH 7 chargeNa 2Ca 1Mg 1C 3S(6) 1SELECTED_OUTPUT 2USER_PUNCH 210 t = SYS("phases", count , name$ , type$ , s_index )20 for i = 1 to count30 if s_index(i) < 0 then goto 5040 PUNCH name$(i), s_index(i)50 next iEND