Дано натуральное число n.найти сумму цифр этого числа.(qbasik)

martynova93 martynova93    1   19.05.2019 20:10    0

Ответы
wwdwd wwdwd  13.06.2020 02:25

INPUT A%
S$ = STR$(A%)
SUM = 0
FOR I = 1 TO LEN(S$)
SUM = SUM + VAL(MID$(S$,I,1))
NEXT I
PRINT SUM

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика