Сумма и произведение цифр случайного трехзначного числа
Задача
Сгенерировать случайное число, вывести на экран это число, а также сумму и произведение его цифр.
Решение
Алгоритм решения задачи:
- random(900) генерирует случайное число от 0 до 899. Если прибавить к нему 100, то получится диапазон от 100 до 999 включительно, т. е. охватывает все трехзначные числа.
- Чтобы извлечь из числа цифру сотен надо его разделить нацело на 100.
- Для получения цифры десяток можно сначала разделить нацело на 10, а затем найти остаток от деления на 10.
- Единицы извлекаются путем нахождения остатка от деления числа на 10.
Программа на языке Паскаль:
var n: integer; a,b,c: byte; begin randomize; n := random(900) + 100; writeln(n); a := n div 100; b := n div 10 mod 10; c := n mod 10; writeln('Сумма: ',a+b+c); writeln('Произведение: ',a*b*c); end.
Пример выполнения программы:
536 Сумма: 14 Произведение: 90
Комментарии
напишите блок схему к этой…