Описать функцию Digit N (K, N) целого типа, возвращающую N-ю цифру целого положительного числа R - VB

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

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

Описать функцию Digit N(K,N) целого типа, возвращающую N-ю цифру целого положительного числа R. (цифры в числе измеряются справа налево) Если количество цифр в числе К меньше N,то данных целых положительных чисел К1, К2, ... К5 . Вызвать функцию DigitN с пораметром N, изменится от 1 до 5

Решение задачи: «Описать функцию Digit N (K, N) целого типа, возвращающую N-ю цифру целого положительного числа R»

textual
Листинг программы
Function Digit(r As Integer, n As Integer)
   If (n = 1) Then
      Digit = r Mod 10
   Else
      If r < 10 Then
         Digit = -1
      Else
         Digit = Digit(r \ 10, n - 1)
      End If
   End If
End Function

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


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

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

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