Найти максимальную цифру натурального числа - PascalABC.NET

Узнай цену своей работы

Формулировка задачи:

( с помощью рекурсивной функции или процедуры). Найти максимальную цифру натурального числа.

Решение задачи: «Найти максимальную цифру натурального числа»

textual
Листинг программы
function mx(i : int64) : integer;
begin
  if i = 0 then result := 0
  else
  begin
    result := mx(i div 10);
    if i mod 10 > result then result := i mod 10;   
  end;
end;

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

15   голосов , оценка 3.933 из 5
Похожие ответы