Разработайте и отладьте программу, которая для произвольного натурального двузначного числа определяет:
а) сумму и произведение его цифр;
б) число, образованное перестановкой цифр исходного числа.
Тест для проверки правильности программы придумайте самостоятельно.
Пусть введено число n от
var
n, a, b, s, p, m: integer;
begin
readln(n);
a := n div ;
b := n mod ;
s := a + b;
p := a * b;
m := * b + a;
writeln('Сумма цифр: ', s);
writeln('Произведение цифр: ', p);
writeln('После перестановки: ', m)
end.
Первая строка после begin считывает число; две следующие выделяют его цифры. Затем программа отдельно вычисляет три требуемых результата и выводит их. Тест: при n =
а) Сумма цифр: a + b; произведение: a · b. б) Переставленное число:
