18 lines
236 B
Text
18 lines
236 B
Text
|
s$ = input
|
||
|
|
print s$ & ",SUM"
|
||
|
|
repeat
|
||
|
|
s$ = input
|
||
|
|
until s$ = ""
|
||
|
|
sum = 0
|
||
|
|
for v in number strsplit s$ ","
|
||
|
|
sum += v
|
||
|
|
.
|
||
|
|
print s$ & "," & sum
|
||
|
|
.
|
||
|
|
input_data
|
||
|
|
C1,C2,C3,C4,C5
|
||
|
|
1,5,9,13,17
|
||
|
|
2,6,10,14,18
|
||
|
|
3,7,11,15,19
|
||
|
|
4,8,12,16,20
|