сервис вопросов и ответоврешить в паскале найти произведение цифр четырёхзначного числа
10-11 класс|
|
Reginarezyapova
12 сент. 2016 г., 23:02:52 (7 лет назад)
Katya190602
12 сент. 2016 г., 23:54:50 (7 лет назад)
var
p: longint;
k, m, n, i: integer;
begin
Write('Введите целое четырехзначное число: ');
Readln(n);
n := Abs(n); { вдруг отрицательное введут? }
p := 1;
for i := 1 to 4 do
begin
m := n mod 10;
n := n div 10;
p := p * m
end;
Writeln('Произведение цифр в числе равно ', p);
end.
Тестовое решение:
Введите целое четырехзначное число: 1234
Произведение цифр в числе равно 24
5776692
13 сент. 2016 г., 0:49:43 (7 лет назад)
Можно чуть подробней?
Ответить
Другие вопросы из категории
Читайте также
Срочно! Дано трехзначное число. Если сумма цифр этого числа превышает 15, то вывести эту сумму. Иначе вывести
произведение цифр этого числа.
Необходимо решение на языке Паскаль. Заранее спасибо!
нужно как из четырёхзначного числа сравнить первую и последнюю цифру и две средних вопрос в том что как их вытащить из этого числа? первую и последнюю я
понял как
Console.WriteLine("Введите четырёхзначное число");
m = int.Parse(Console.ReadLine());
a = m / 1000; //последняя 1 цифра
b = m % 10;
допусти я ввёл число 6432 то прога выводит мне 6 и 2 мне надо ещё как то отдельно вывести цифры 4 и 3 и задать им отдельные переменные что бы сравнить
1.Дано натуральное число:
a) найти произведение цифр числа б) верно ли, что в данном числе нет данной цифры А (цифру А вводить с клавиатуры)
2. Найти все трехзначные числа, которые при увеличении на 1 делятся на 2, при увеличении на 2 делятся на 3, при увеличении на 3 делятся на 4, а при увеличении на 4 делятся на 5.
3.Из данного натурального числа удалить все цифры А (а вводятся с клавиатуры).
Написать программы в паскале и желательно блок-схему, но можно и без нее.
Помогите пожалуйста)
Написать программу на Паскале. Дано четырехзначное натуральное число. Найти количество цифр данного числа, большие цифры А (А вводит пользователь) и
определить, верно ли, что данное число кратно 3.
Вы находитесь на странице вопроса "решить в паскале найти произведение цифр четырёхзначного числа", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.