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

0 голосов
51 просмотров

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


Информатика (58 баллов) | 51 просмотров
Дано ответов: 2
0 голосов

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


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

 

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

(5.6k баллов)
0 голосов

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 в директории откуда будет запускаться программа.

(170 баллов)