Натуральное число вводится с клавиатуры найти разность между мах и мин цыфрой этого числа
Натуральное число вводится с клавиатуры найти разность между мах и мин цыфрой этого числа
Гость
Ответ(ы) на вопрос:
Гость// PascalABC.NET 3.1, сборка 1219 от 16.04.2016
begin
var s:=ReadlnString('Введите натуральное число:');
var s1:=s.TakeWhile(x->x in ['0'..'9']);
Write('Принято число: '); s1.Println('');
Writeln('Искомая разность: ',StrToInt(s1.Max)-StrToInt(s1.Min))
end.
Тестовое решение:
Введите натуральное число: 346235853i34535
Принято число: 346235853
Искомая разность: 6
Не нашли ответ?
Похожие вопросы