Определить номер цифры, равной сумме цифр числа

Категория: Basic

2012-02-06 16:41:04

Дано натуральное число.

code: #basic

INPUT "vvedite chislo ", n
DO
a=n MOD 10
s=s+a
n = n \ 10
LOOP UNTIL n=0
IF s=a THEN PRINT "1 cifra=summe cifr chisla" ELSE PRINT "net takoj cifry"

автор: кот Бегемот

Поделиться:

Sample Code