Question

1)Дано четырехзначное число. Найти: а) сумму его цифр; б) произведение его цифр. 2)В трехзначном числе x зачеркнули первую цифру. Когда оставшееся число умножили на 10, а произведение сложили с первой цифрой числа x, то получилось число 564. Найти число x.

Answer 1

1 задание:

Сначала мы вводим в программу четырезначное число.

Затем идет защита от дурака, то есть, чтобы человек ваел именно четырехзначное число. Реализовано это при помощи команды repeat. Почему именно через нее? Чтобы если мы ввели нечетырехзначное, то программа незакрывалась, а попросила бы нас ввести число заного.

Далее при помощи команд вывода уже выводятся сумма и произведение цифр числа. Реализовано это все сразу в них, без помощи дополнительных переменных, что немного уменьшает объем программы. Реализовал определение цифр числа при помощи команд div и mod.

program school3;

Var chislo:Integer;

begin

Repeat

Write('Введите четырехзначное число>> ');

Readln(chislo);

Until (chislo<=9999) and (chislo >=1000);

WriteLn('Сумма цифр числа = ', (chislo mod 10)+(chislo div 10 mod 10)+(chislo div 100 mod 10)+(chislo div 1000));

Write('Произведение цифр чи сла = ', (chislo mod 10)*(chislo div 10 mod 10)*(chislo div 100 mod 10)*(chislo div 1000));

end.

2 задание:

Произведем обратные действия:

Число должно оканчиваться на 0,т.к изначально оно было домножено на 10, от сюда следует, что было число 560 и к нему добавили 4. Значит, 4 эта первая цифра числа. Теперь поделим 560 на 10 и получим 56. Значит, из числа 56 зачеркнули первую цифру и это была цифра 4,преписана с конца при умножение на 10.

Теперь знаем изначально заданное число: 456.

Произведем проверку:

Зачеркнём у числа 456 первую цифру. Получим 56. Домножим 56 на 10 и получим 560. К 560 прибавим первую цифру заданного числа и получим 564. ЧТД.

Если это надо было решить в паскале(2 задание) , то надо было уточнять.

Answer 2

Давайте решим задачи по порядку:

1. Дано четырехзначное число. Найдем сумму и произведение его цифр.

Предположим, что четырехзначное число записано в виде "abcd", где "a", "b", "c" и "d" - цифры этого числа.

а) Найдем сумму его цифр: Сумма цифр числа будет равна a + b + c + d.

б) Найдем произведение его цифр: Произведение цифр числа будет равно a * b * c * d.

2. В трехзначном числе x зачеркнули первую цифру. Когда оставшееся число умножили на 10, а произведение сложили с первой цифрой числа x, то получилось число 564. Найдем число x.

Предположим, что трехзначное число записано в виде "xyz", где "x", "y" и "z" - цифры этого числа.

Мы знаем, что "x" является первой цифрой числа x, а оставшееся число, полученное после зачеркивания "x", равно "yz".

Условие задачи гласит, что когда оставшееся число "yz" умножается на 10 и затем складывается с числом "x", получается число 564:

10 * (10 * y + z) + x = 564

Теперь решим уравнение:

100 * y + 10 * z + x = 564 100 * y + 10 * z = 564 - x

Также у нас есть ограничение, что "x", "y" и "z" являются цифрами, т.е., они находятся в диапазоне от 0 до 9.

Из уравнения 100 * y + 10 * z = 564 - x следует, что 100 * y + 10 * z является числом, кратным 10. Поэтому "y" должно быть равно 5 (потому что 10 * 5 = 50). Теперь подставим "y = 5" в уравнение:

100 * 5 + 10 * z = 564 - x 500 + 10 * z = 564 - x 10 * z = 64 - x

Мы также знаем, что "z" также является цифрой, поэтому он находится в диапазоне от 0 до 9. В таком случае, чтобы 10 * z было равным числу от 0 до 9, "x" должно быть равно 6 (потому что 64 - 6 = 58, и это максимально возможное значение для 10 * z).

Теперь, когда мы нашли "x" и "y", можем легко найти "z":

10 * z = 64 - x 10 * z = 64 - 6 10 * z = 58 z = 58 / 10 z = 5.8

Так как "z" должно быть целым числом, то это не возможно. Это значит, что нет такого трехзначного числа x, которое удовлетворяло бы условиям задачи. Возможно, в условии задачи была ошибка, или вариантов решения не существует.