Организовать ввод трехзначного натурального числа с клавиатуры. Программа должна определитьнаименьшие и наибольшие цифры, которые входят в состав данного
натурального числа.

Замечание: число не обязательно должно быть трехзначным.

Класс, все работает! Спасибо!

Конечно работает)) Пожалуйста

Вводим число, получаем по очереди его цифры, заносим их в список. Заполненный список сортируем по возрастанию. Первый элемент списка, естественно, будет минимальным, последний - максимальным. Что тут может не работать?

PascalABC.NET 3.4.0, сборка 1670 от 23.05.2018Внимание! Если программа не работает, обновите версию!begin  var n:=ReadInteger('Введите натуральное трехзначное число:');  var L:=new List<integer>;  while n>0 do begin    L.Add(n mod 10);    n:=n div 10    end;  L.Sort;  Writeln('Наименьшая цифра в числе ',L.First,', наибольшая ',L.Last)end.ПримерВведите натуральное трехзначное число: 634Наименьшая цифра в числе 3, наибольшая 6