Дано четырехзначное число. вывести последовательно на экран сумму его цифр, произведение его цифр "число перевертыш"
Дано четырехзначное число. вывести последовательно на экран сумму его цифр, произведение его цифр "число перевертыш"
Гость
Ответ(ы) на вопрос:
Гостьvar
a, b,c,d,e:longint;
begin
readln(a);
b:=a biv 1000;
c:=a biv 100 mod 10;
d:=a biv 10 mod 10;
e:= a mod 10;
writeln(b+c+d+e);
writeln(b×c×d×e);
writeln(e,d,c,b);
end.
Не нашли ответ?
Похожие вопросы