Вводится единственное трехзначное число. Выведите его минимальную цифру. Пример Ввод Вывод 123 1
Вводится единственное трехзначное число. Выведите его минимальную цифру.
Пример
Ввод Вывод
123 1
Гость
Ответ(ы) на вопрос:
Гостьvarp,v,t,x:integer;
begin
write('Введите число ');
readln(x);
p:=x div 100;
v:=(x div 10) mod 10;
t:=(x mod 100) mod 10;
if (p < v) and (p