Вход
Регистрация
О проекте Как заработать?
69

Найти произведение цифр целого положительного числа…

gmyhalich 08 марта 2023

Найти произведение цифр целого положительного числа, введенного с клавиатуры

категория: информатика
ответить
в избранное

67

Dim i As IntegerDim x As IntegerDim Summ As Integeri=InputBox ("Введите целочисленное положительное число") Summ=1 For x=0 To Len (CStr (i) — 1 Summ*=CInt (Mid (CStr (i) , x+1, 1) ' c2fbefeeebede8eb3a20caf3eff0e8ffedeee220c42ec52e2028632920442d6d6f6e3535NextMsgBox (Summ)

пользователи выбрали этот ответ лучшим
комментировать
в избранное ссылка отблагодарить

Знаете другой ответ?
Другие вопросы по информатике
censoored
08 марта 2023
1
ответ
S=1/2*a*h решить по паскале
zebrdobr
08 марта 2023
1
ответ
1) Почему именно египтяне первые начали использовать папирус для письма? 2) Что делали древние египтяне когда папирус засыхал и трескался? 3) Почему всредние века письменнык документы состовлялись на пергаментных свитках а не на папирусе? 4) Будет ли работать винчестер в космосе? 5) На какой пирог похож лазерный диск? 6) Как человек 21 века использует папирус?
kushniras
08 марта 2023
1
ответ
Что такое граф и как его строить!
dmitry_
08 марта 2023
1
ответ
Передача данных через ADSL-соединение равна 128000 бит /с. Сколько времени (в секундах) займет передача файла объемом 500 Кбайт по этому каналу?
migarus
08 марта 2023
1
ответ
1. Запишите в двоичной системе свой день, месяц и год рождения. Мой год рождения 31,03,97
loyal
08 марта 2023
1
ответ
Помогите пожалуйста срочно нужно! 1) программа для определения объема и площади поверхности шара. Вот формула если что S=4ПR²,V=¾ΠR² 2) программа проверяет является ли введенное число нечетным и при этом делится на 5 3) задача нахождения факториала числа ЗАРАНЕЕ ОГРОМНОЕ СПАСИБО!
gromst
08 марта 2023
1
ответ
Выполнить деление: a) 110011000 (2): 10001 (2) b) 2410 (8): 27 (8) c) D4A (16): 1B (16)
kostya39
08 марта 2023
1
ответ
Дан массив из 10 целых чисел найти произведение элементов массива с четнымииндексами
r-instrument
08 марта 2023
1
ответ
Типы меню в операционной системе Windows 7,1. Какое из приложений Microsoft Office позволяет работать с базами данных: 1- Access, 2-Word,3-PowerPoint, 4- Excel
Задайте свой вопрос

ПОПУЛЯРНОЕ
censoored, 08 марта 2023
S=1/2*a*h решить по паскале
zebrdobr, 08 марта 2023
1) Почему именно египтяне первые начали использовать папирус для письма?
kushniras, 08 марта 2023
Что такое граф и как его строить!
dmitry_, 08 марта 2023
Передача данных через ADSL-соединение равна 128000…
migarus, 08 марта 2023
1. Запишите в двоичной системе свой день, месяц и год рождения. Мой год рождения 31,03,97
loyal, 08 марта 2023
Помогите пожалуйста срочно нужно!
gromst, 08 марта 2023
Выполнить деление: a) 110011000 (2): 10001 (2) b) 2410 (8): 27 (8) c) D4A (16): 1B (16)
kostya39, 08 марта 2023
Дан массив из 10 целых чисел найти произведение элементов массива с четнымииндексами
r-instrument, 08 марта 2023
Типы меню в операционной системе Windows…
27400
Алгебра
14821
Английский язык
14216
Биология
7369
Другой
720
Экономика
18828
Физика
8304
География
15850
Геометрия
5255
Информатика
11818
История
23332
Химия
15992
Литература
73118
Математика
8152
Обществознание
465
Правоведение
46271
Русский язык
Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...