MODE12
PRINT"FINANCIAL.320MB21499"
   DATA 26/2/99,6322.28,-209,-50,-260,-18.75,67.5,4.54,20.88,-125.85,-110,-8,-25,-10,-30,-15,-20,180,-1.5,-20,-10,-63.25,-300,-100,0
   
REPEAT
READ TITLE$ : PRINT' TITLE$ GET$
S=0  : I=0
REPEAT
READ X
S+=X : I +=1
PRINT;I TAB(4) X TAB(12) S
UNTIL X = 0
UNTIL FALSE

END