Войти Регистрация Спроси ai-bota

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

Ответ:

гглол

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

0,0(0 оценок)

Популярные вопросы: Информатика

swetakorchagov

29.04.2020 20:48

Как поставить шейдеры в майне если нету папки shaderpacks, скачал оптифайн и форж, все равно не выходит. задаю во здесь потому что на майл ру не отвечают. создавал...

Falzy

12.03.2020 21:30

Сравнение чисел С++ На вход программе подаются два целых числа m и n, по модулю не превосходящие 106. Если m≥n, то требуется вывести 1, в противном случае — любое...

RenoGant

26.02.2020 01:17

напишите подробно что будет выведено на экран монитора в результате выполнения фрагмента программы s : = 0 for i:=1 to 5 do begin for:=1 to 2 do begin write ( 1 );...

BekaBeka001

25.05.2023 11:13

Тус датчигинин канша режими бар?...

mashakovalak234

16.03.2023 06:53

Найти площадь прямоугольника используя c++ ...

saule19611225

25.04.2021 10:21

Ксистемам базами данных относится...

xeniathcelykh

23.10.2020 12:13

Напишите программу, которая принимает от пользователя трёхзначное число, подсчитывает и выводит на экран произведение его цифр...

Danyaukos

25.06.2022 03:44

Систему связанных между собой компьютеров, расположенных на большом удалении друг от друга, называют: абонентами глобальной сетью провайдерами локальной сетью...

komogortseva0101

16.05.2023 03:37

Какая команда в скрипте создаёт анимацию Рыбки сижу на соре...

Серёжа331

08.04.2023 11:52

Диаметр циферблата часов равен 11 см. найдите длину минутной стрелки...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку