Дано трехзначное целое число. Найти произведение этого числа на разность максимального и минимального чисел, составленных их цифр исходного числа. Например для заданного числа 315 получим: 315 * (531 - 135) = 124740

Question

Информатика

Марионилла

1 сентября, 14:02

Дано трехзначное целое число. Найти произведение этого числа на разность максимального и минимального чисел, составленных их цифр исходного числа. Например для заданного числа 315 получим: 315 * (531 - 135) = 124740

+4

Ответы (1)

Знаете ответ?

Гаша · Answer 1

В PascalABC

var n: integer;

s: string;

begin

write ('число: ') ; readln (s) ;

n: = (StrToInt (s. Sorted. Reverse. JoinIntoString ('')) - StrToInt (s. Sorted. JoinIntoString (''))) * StrToInt (s) ; writeln ('число: ', n) ;

end.