Строка: Разделите точками цифры заданного числа группами по три, начиная справа. - VB

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

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

Помогите,пожалуйста,с программами для этих задач 1)Разделите точками цифры этого числа группами по три , начиная справа. Программа получает на вход натуральное число , содержащее не более 100 цифр. Программа должна вывести то же число , с точками между некоторыми цифрами этого числа. Примеры входных и выходных данных Ввод 1000 12345678 Вывод 1.000 12.345.678

Решение задачи: «Строка: Разделите точками цифры заданного числа группами по три, начиная справа.»

textual
Листинг программы
Dim f, s$, s1$
Const n = 3 'Точка
s = InputBox("Число", , "123456789")
For f = 1 To Len(s)
    If (f Mod n) = 0 Then s1 = s1 & "."
    s1 = s1 & Mid$(s, f, 1)
Next

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


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

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

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