Отыскать произведение цифр данного 4-х значного числа

Отыскать творение цифр данного 4-х значного числа

Задать свой вопрос
1 ответ

Метод 1

То, как необходимо писать на PascalABC с его способностями. Если Вас устрашает запись на пятой строке, то не стоит волноваться. Читаем с конца: превращаем числов строчку (IntToStr), берём i-тую цифру (цикл будет идти с каждым умножением числа на следующую), превращаем назад цифру в строчку и умножаем на имеющееся произведение.

Метод 2

Старый, накладный и неприглядный.

Эвелина Никалина
А вот оформление у меня в школе совсем иное9
Пашок
В школе Вы выносите объявление всех переменных в блок var.
Шишурин Васька
Так?
Есения Пинекина
да
Эмилия Любардина
И в чём проблема?var inputNumber, resultNumber: integer;begin// удаляете в первых 2-ух строчках varend.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт