Строка: Разделите точками цифры заданного числа группами по три, начиная справа. - 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
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
