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

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

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

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