В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
mashanlo2006
mashanlo2006
29.09.2022 18:24 •  Информатика

Нужна бесплатная программа которая сможет найти все трёхзначные комбинации.для маленьких букв и всех цифр.

Ответ:
Dvoeshnik666
Dvoeshnik666
12.06.2020 09:58

Можно самому написать, Скачиваете программу Hugs 98
Вней в коммандной строке вводите текст ниже и запускаете по Enter:
Для длинны 3 будет:


[[p1]++[p2]++[p3]|p1<-ch,p2<-ch,p3<-ch] where ch=['a'..'z']++['0'..'9']

 

всего 46656 комбинаций

0,0(0 оценок)
Ответ:
Remka228
Remka228
12.06.2020 09:58

var i,j,k:integer;
var f:text;
var a:array[0..35] of string =('a', 'b', 'c', 'd', 'e', 'f', 'g',
                             'h', 'i', 'j', 'k', 'l', 'm', 'n',
            'o', 'p', 'q', 'r', 's',
            't', 'u','v', 'w', 'x', 'y', 'z', '0', '1', '2', '3', '4',
            '5', '6', '7', '8', '9');
begin
  assign (f, 'text.txt');
  rewrite(f);
  for i:=0 to 35 do
    for j:=0 to 35 do
       for k:=0 to 35 do
        writeln(f ,(a[i]+a[j]+a[k]));
  close(f);
  readln;
end.
Нужно создать text.txt в директории откуда будет запускаться программа.

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?