Ответы на вопрос:
input a%s$ = str$(a%)sum = 0for i = 1 to len(s$)sum = sum + val(mid$(s$,i,1))next iprint sum
Популярно: Информатика
-
ЕлИзАвЕтКа091515.10.2021 13:44
-
nastusya170913.02.2020 01:48
-
Доо4327.03.2021 20:10
-
rje8739112.10.2020 11:37
-
EM2001130.11.2020 23:34
-
Logikahaha09.05.2020 20:58
-
Nerzul282881823.08.2021 08:56
-
Wer7709.11.2021 02:14
-
Помошь022.04.2022 09:35
-
sushenkop08wf426.11.2020 02:05