Описать функцию 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
Листинг программы
  1. Function Digit(r As Integer, n As Integer)
  2.    If (n = 1) Then
  3.       Digit = r Mod 10
  4.    Else
  5.       If r < 10 Then
  6.          Digit = -1
  7.       Else
  8.          Digit = Digit(r \ 10, n - 1)
  9.       End If
  10.    End If
  11. End Function

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


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

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

13   голосов , оценка 3.923 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут
Похожие ответы