9. Разработайте и отладьте программу, которая для произвольного натурального двузначного числа определяет:
а) сумму и произведение его цифр;
б) число, образованное перестановкой цифр исходного числа.
Тест для проверки правильности программы придумайте самостоятельно.
Ответ
Вот пример программы на языке Паскаль, которая находит сумму и произведение цифр двузначного числа и переставляет эти цифры:
var
number, digit1, digit2, sum, product, newNumber: integer;
begin
// Ввод двузначного числа
writeln(‘Введите двузначное число:’);
readln(number);
// Проверка, что число является двузначным
if (number < 10) or (number > 99) then
begin
writeln(‘Введите двузначное число!’);
exit;
end;
// Нахождение первой и второй цифры
digit1 := number div 10;
digit2 := number mod 10;
// Нахождение суммы и произведения цифр
sum := digit1 + digit2;
product := digit1 * digit2;
// Формирование нового числа путем перестановки цифр
newNumber := digit2 * 10 + digit1;
// Вывод результатов
writeln(‘Сумма цифр:’, sum);
writeln(‘Произведение цифр:’, product);
writeln(‘Число с переставленными цифрами:’, newNumber);
end.
Пример теста:
Введите двузначное число:
56
Сумма цифр: 11
Произведение цифр: 30
Число с переставленными цифрами: 65
Пример работы программы:
Для двузначного числа 56 сумма цифр равна 11 (5 + 6), произведение цифр равно 30 (5 * 6), а число с переставленными цифрами равно 65.