Написать программу о нахождении двухзначного числа А.Найти сумму и произведение цифр данного числа,а также вывести новое число,в котором цифры числа А поменялись местами
More Questions From This User See All
Copyright © 2025 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Verified answer
Var a,a1,a2:integer;begin
readln(a);
a1:=a div 10;
a2:=a mod 10;
writeln("Сумма цифр = ",a1+a2);
writeln("Произведение цифр = ",a1*a2);
writeln("Число наоборот: ",a2*10+a1);
end.
Пример:
25
Сумма цифр = 7
Произведение цифр = 10
Число наоборот: 52