Дано трехзначное целое число. Найти произведение этого числа на разность максимального и минимального чисел, составленных их цифр исходного числа. Например для заданного числа 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.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
