Алфавит. Все вариации

@Паскалька · Регистрация: 10.09.2013

Студворк — интернет-сервис помощи студентам

Интересненькая задачка. Нужно вывести все варианты алфавита, точнее его букв. То есть нужно вывести.

Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
а|а
б|б
.....
я|я
....
аа|аа
....
ая|ая
....
ааа|ааа
ааб|ааб
аав|аав
....
яяяяя|яяяяя

Не спрашивайте зачем мне это

Главное это все сгенерировать и вывести файл. Каждое выражение, новая строка.

Code
1
2
3
4
...
а|а
б|б
...

Нужно выводить именно Буква(ы)|Буква(ы), то есть через палку.
в конце будет по 5 букв слева, и 5 букв справа от палки.

Можно просто скинуть сам файл, который сгенерируется, нужны мне только эти буковки, либо саму прогу. Если что не понятно, что я от вас хочу. Пишите. Я знаю что объяснять не умею

@Вениамин Шепард · 08.03.2014, 17:32

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
var
    f,f1,f2,f3,f4:char;
    g: text;
Begin
    Assign(g,'Out.txt');//Out.txt - это файл, в котором будет результат
    Rewrite(g);
    for f := 'а' to 'я' do
        writeln(g,f,'|',f);
    for f := 'а' to 'я' do 
        for f1 := 'а' to 'я' do
            writeln(g,f,f1,'|',f,f1);
    for f := 'а' to 'я' do 
        for f1 := 'а' to 'я' do
            for f2 := 'а' to 'я' do
                writeln(g,f,f1,f2,'|',f,f1,f2);
    for f := 'а' to 'я' do 
        for f1 := 'а' to 'я' do
            for f2 := 'а' to 'я' do
                for f3 := 'а' to 'я' do
                    writeln(g,f,f1,f2,f3,'|',f,f1,f2,f3);
    for f := 'а' to 'я' do 
        for f1 := 'а' to 'я' do
            for f2 := 'а' to 'я' do
                for f3 := 'а' to 'я' do
                    for f4 := 'а' to 'я' do
                        writeln(g,f,f1,f2,f3,f4,'|',f,f1,f2,f3,f4);
    close(g);
end.

Вот программа, результат будет в файле Out.txt
Если что-то не понравится напиши, я переделаю.
Программа работает не очень быстро, но работает.
P.S. Напиши, зачем тебе это?

@Паскалька · 08.03.2014, 17:53 **[ТС]**

Да спасибо, я понимаю что долго, файл не малый будет.
Зачем? не смейся, баг в PHP скрипте убрать)
Ща проверю.

Добавлено через 3 минуты
Я конечно ожидал что файл не малый будет, но блин, 500мб многова-то урезал до 4 символом, получилось 11мб

Спс тебе за помощь

KOPOJI · 08.03.2014, 17:55

Не по теме:

аж интересно, что же за баг такой. Сколько писал на пыхе, ни разу с таким не встречался. Я, конечно, не эксперт, но, все же..?

@Паскалька · 08.03.2014, 18:01 **[ТС]**

Ой ща оговаривать будете...ругать...умничать...
Просто на форуме с++ и паскалевском по более добродетелей, а вот на PHP форуме либо молчат, либо... ну да ладно.

Скрипт этот кличут в инете синонимайзер, то есть функция его это поиск и замена на синонимы в тексте. Пробывал делать регулярынми выражением, все норм, это недочета нет, но ОЧЕЕНь не выгодно, медленно работает. Сделал поиск слов из файла, появилась эта фигня: "Например в базе есть слово "быстр", если ввести слово "ыстр" он выведет слово "незамедлителен", а это синоним слова "быстр", если ввести слово "ыстра", то выведет слово "незамедлительна", а это синоним слова "быстра"". Но вот как то так, пожет кто поможет с этим?

Синонимайзер ищет побуквенно:( Чуть подправить надо

KOPOJI · 08.03.2014, 18:03

Не по теме:

Сообщение от Паскалька

Ой ща оговаривать будете...ругать...умничать...

да мне по барабану.

@Паскалька · 08.03.2014, 18:04 **[ТС]**

Ясно. Твоя задача спам чистить?

KOPOJI · 08.03.2014, 18:07

Не по теме:

Нет, мне нравится помогать. Городите костыли на паскале для исправления кода на пыхе, не имею ничего против. Предлагаю закончить на этом оффтоп. Да, я хотел помочь, выяснив, в чем проблема - но после ответа желание пропало. Прошу извинить за беспокойство, Вам я больше отвечать не буду.

@Паскалька · 08.03.2014, 18:13 **[ТС]**

В чем же твоя обида? Мне было просто интересно почему у тебя нет сообщений, рейтинга, я предположил что ты только занимаешься модерированием форума

KOPOJI · 08.03.2014, 18:22

Не по теме:

Паскалька, https://www.cyberforum.ru/abou... ost5781457

@Паскалька · 08.03.2014, 18:30 **[ТС]**

Извини что не по теме, как бы это не звучало парадоксально, а как делать это "Не по теме:" я найти не могу(

@Puporev · 08.03.2014, 19:21

Сообщение от Паскалька

а как делать это "Не по теме

Выше окна сообщений в тулбаре кнопка OFF

@Паскалька · 08.03.2014, 19:38 **[ТС]**

Не по теме:

Спс

@Вениамин Шепард · 08.03.2014, 22:12

Я вообще PHP не знаю

Новые блоги и статьи Все статьи Все блоги /
Оттенки серого Argus19 18.03.2026 Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .	SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++ 8Observer8 17.03.2026 Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip	Символические и жёсткие ссылки в Linux. algri14 15.03.2026 Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .	[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ФедосеевПавел 14.03.2026 Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .
делаю науч статью по влиянию грибов на сукцессию anaschu 13.03.2026 прикрепляю статью	SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++ 8Observer8 10.03.2026 Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:	Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE 8Observer8 10.03.2026 Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .	Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки Neotwalker 08.03.2026 Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .

@Паскалька 10 / 10 / 2 Регистрация: 10.09.2013 Сообщений: 136 Записей в блоге: 1
	08.03.2014, 17:53 [ТС]
	Да спасибо, я понимаю что долго, файл не малый будет. Зачем? не смейся, баг в PHP скрипте убрать) Ща проверю. Добавлено через 3 минуты Я конечно ожидал что файл не малый будет, но блин, 500мб многова-то урезал до 4 символом, получилось 11мб Спс тебе за помощь 0

KOPOJI
	08.03.2014, 17:55
	Не по теме: аж интересно, что же за баг такой. Сколько писал на пыхе, ни разу с таким не встречался. Я, конечно, не эксперт, но, все же..? 0

@Паскалька 10 / 10 / 2 Регистрация: 10.09.2013 Сообщений: 136 Записей в блоге: 1
	08.03.2014, 18:01 [ТС]
	Ой ща оговаривать будете...ругать...умничать... Просто на форуме с++ и паскалевском по более добродетелей, а вот на PHP форуме либо молчат, либо... ну да ладно. Скрипт этот кличут в инете синонимайзер, то есть функция его это поиск и замена на синонимы в тексте. Пробывал делать регулярынми выражением, все норм, это недочета нет, но ОЧЕЕНь не выгодно, медленно работает. Сделал поиск слов из файла, появилась эта фигня: "Например в базе есть слово "быстр", если ввести слово "ыстр" он выведет слово "незамедлителен", а это синоним слова "быстр", если ввести слово "ыстра", то выведет слово "незамедлительна", а это синоним слова "быстра"". Но вот как то так, пожет кто поможет с этим? Синонимайзер ищет побуквенно:( Чуть подправить надо 0

@Паскалька 10 / 10 / 2 Регистрация: 10.09.2013 Сообщений: 136 Записей в блоге: 1
	08.03.2014, 18:04 [ТС]
	Ясно. Твоя задача спам чистить? 0

KOPOJI
	08.03.2014, 18:07
	Не по теме: Нет, мне нравится помогать. Городите костыли на паскале для исправления кода на пыхе, не имею ничего против. Предлагаю закончить на этом оффтоп. Да, я хотел помочь, выяснив, в чем проблема - но после ответа желание пропало. Прошу извинить за беспокойство, Вам я больше отвечать не буду. 0

@Паскалька 10 / 10 / 2 Регистрация: 10.09.2013 Сообщений: 136 Записей в блоге: 1
	08.03.2014, 18:13 [ТС]
	В чем же твоя обида? Мне было просто интересно почему у тебя нет сообщений, рейтинга, я предположил что ты только занимаешься модерированием форума 0

KOPOJI
	08.03.2014, 18:22
	Не по теме: Паскалька, https://www.cyberforum.ru/abou... ost5781457 0

@Паскалька 10 / 10 / 2 Регистрация: 10.09.2013 Сообщений: 136 Записей в блоге: 1
	08.03.2014, 18:30 [ТС]
	Извини что не по теме, как бы это не звучало парадоксально, а как делать это "Не по теме:" я найти не могу( 0

@Паскалька
	08.03.2014, 19:38 [ТС]
	Не по теме: Спс 0

@Вениамин Шепард 25 / 11 / 5 Регистрация: 11.01.2014 Сообщений: 85
	08.03.2014, 22:12
	Я вообще PHP не знаю 0

Алфавит. Все вариации

Решение