Работа 3.1 Упр.9 ГДЗ Семакин 10 класс (Информатика)

Задача

Рассмотрим вариант решения задания из учебника Семакин, Хеннер, Шеина 10 класс, Бином: 9. Найти произведение всех цифр заданного четырехзначного числа. *Цитирирование задания со ссылкой на учебник производится исключительно в учебных целях для лучшего понимания разбора решения задания. 10 semakin10 pract/3-1/9 98

Подробный ответ

Пусть четырёхзначное число хранится в переменной $$n$$. Тогда:

первая цифра: $$n \div 1000$$;
последняя цифра: $$n \bmod 10$$;
вторая и третья цифры: $$\left(n \bmod 1000\right) \div 10$$.

Произведение всех цифр найдём по формуле:

$$p = (n \div 1000)\cdot(n \bmod 10)\cdot\left((n \bmod 1000)\div 10\right)\cdot\left((n \bmod 10)\right)$$

Удобнее сначала выделить первую и последнюю цифры, затем вторую и третью, после чего перемножить все четыре цифры.

var n, p: integer;
begin
  Write(‘Введите натуральное четырехзначное число -> ‘);
  Readln(n);
  p := (n div 1000) * (n mod 10);
  n := (n mod 1000) div 10;
  p := p * (n div 10) * (n mod 10);
  Writeln(‘Произведение цифр числа равно ‘, p);
end.