17 lines
236 B
Text
17 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
|