Дано целое число. Вывести на экран значение самой младшей его цифры - Pascal ABC
Формулировка задачи:
Помогите пожалуйста решить задачу: дано целое число. Вывести на экран значение наименьшей его цифры.
Решение задачи: «Дано целое число. Вывести на экран значение самой младшей его цифры»
textual
Листинг программы
- readln(n);
- n:=abs(n);
- m:=9;
- while n>0 do
- begin
- if n mod 10<m then m:=n mod 10;
- n:=n div 10;
- end;
- write(m);
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
