profile
Опубликовано 6 лет назад по предмету Информатика от lakomkalove

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

  1. Ответ
    Ответ дан hambis

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

Самые новые вопросы