99999999



Автор Ётанислав Яма задал вопрос в разделе Другие языки и технологии

Как создать txt файл с числами от 00000000 до 99999999 что бы они были записаны столбцом? и получил лучший ответ

Ответ от Ёергей Марков[гуру]
Добрый вечер. Предлагаю Вашу задачу решить с использованием BAT-файла, например с кодом, приведенным ниже. Только вместо текстовjго формата я использовал log - практичнее. Чтобы избежать ошибок при работе переменных, использовал несколько процедур - ваши числа довольно большие.
Сам код.
@chcp 1251
@echo off
del file_2.log
set /a c1=0
set /a c2=0
set /a c3=0
set /a c4=0
set /a c5=0
set /a c6=0
set /a c7=0
:len
set /a count+=1
if %count% gtr 9 (
set /a count=0
set /a c1+=1
if %c1% gtr 8 call :c1
)
echo %c7%%c6%%c5%%c4%%c3%%c2%%c1%%count% >> file_2.log
if %c7% gtr 9 exit
goto :len
:c1
set /a c1=0
set /a c2+=1
if %c2% gtr 9 call :c2
goto :eof
:c2
set /a c2=0
set /a c3+=1
if %c3% gtr 9 call :c3
goto :eof
:c3
set /a c3=0
set /a c4+=1
if %c4% gtr 9 call :c4
goto :eof
:c4
set /a c4=0
set /a c5+=1
if %c5% gtr 9 call :c5
goto :eof
:c5
set /a c5=0
set /a c6+=1
if %c6% gtr 9 call :c6
goto :eof
:c6
set /a c6=0
set /a c7+=1
goto :eof
--
Вот начало результата.
99999999

Ответ от Аноним Инкогнито[гуру]
А откуда ты такие огромные числа знаешь???

Ответ от MaXX1020[гуру]
Обычным циклом в файл прописать, ничего сложного.

Ответ от Chum[гуру]
Цикл от 0 до 99999999
в теле цикла формируешь строку с лидирующими нулями.
тут два варианта
1. если есть функция форматирования числа, то используешь ее;
2. добавляешь в начало нули, потом число, потом отрезаешь 8 символов справа, например:
строка = Прав ("00000000" + цикловая переменная, 8);
добавляешь в объект типа текст полученную строку.
сам объект создается до цикла, записывается после цикла.
profit

Ответ от Ђатьяна[гуру]
Бестолковый вопрос!

Ответ от Jurijus Zaksas[гуру]
Берешь экселевскую табличку за уголок и тянешь. Затем нужно будет установить форматированный вид числа и записать все в текстовый файл.

Ответ от Jurii[гуру]
Зачем такой большой файл… Это же почти гиг!
Сохрани нижеприведённый текст в файле с расширением .vbs и запусти.
Нужно подождать появления предупреждения «Готово! »
Set FSO = CreateObject("Scripting.FileSystemObject")
Set TextStream = FSO.OpenTextFile("file.txt", 8, True)
For N = 0 To 99999999
TextStream.WriteLine(Right("00000000" & N, 8))
Next
TextStream.Close
MsgBox "Готово! "

Ответ от 3 ответа[гуру]
Привет! Вот подборка тем с похожими вопросами и ответами на Ваш вопрос: Как создать txt файл с числами от 00000000 до 99999999 что бы они были записаны столбцом?
 

Ответить на вопрос:

Имя*

E-mail:*

Текст ответа:*
Проверочный код(введите 22):*