Даны 2 числа. Найти поразрядное сложение цифр. Т.е. нужно сложить сотки одного числа и другого, затем десятки и единицы- Basic(Бейсик)

INPUT "vvedite 1 chislo ", a
INPUT "vvedite 2 chislo ", b
DO
k = k + 1
c1 = a MOD 10
c2 = b MOD 10
s = c1 + c2
PRINT "summa "; k; "-go razryada="; s
a = a \ 10
b = b \ 10
LOOP UNTIL a = 0 AND b = 0