Дано трехзначное целое число. Найти произведение этого числа на разность максимального и минимального чисел, составленных их цифр исходного числа. Например для заданного числа 315 получим: 315 × (531 – 135) = 124740
Дано трехзначное целое число. Найти произведение этого числа на разность максимального и минимального чисел, составленных их цифр исходного числа. Например для заданного числа 315 получим: 315 × (531 – 135) = 124740
Гость
Ответ(ы) на вопрос:
ГостьВ 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.
Не нашли ответ?
Похожие вопросы