Функция Разложения числа - VB
Формулировка задачи:
Дана функция. Нужно разложить любое натуральное число на числа и потом эти числа сравнить и вывести максимальное. Программа должна быть универсальная
разложить то разложил но как данные числа запомнить и сравнить?
help me...
не дождавшись ответа сделал не универсалку но только для 4 чисел.
мб кому-то пригодиться
Решение задачи: «Функция Разложения числа»
textual
Листинг программы
Function Max_Digit(BYVAL N As Long) As Byte While N If Max_Digit < N Mod 10 Then Max_Digit = N Mod 10 N = N \ 10 Wend End Function
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д