Опубликовано 09.06.2017 по предмету Информатика от Гость >> <<

СРОЧНО!!!

Все 5-ти буквенные слова составленные из букв В;И;Н;Т; записанны в алфавитном порядке и пронумерованны, вот начало списка:

1.ВВВВВ

2.ВВВВИ

3.ВВВВН

4.ВВВВТ

5.ВВВИВ

Запишате слово,которое состоит под номером 1020 !

Ответ оставил Гость

1020.  ТТТНТ

вот прога выводящая все слова до 1020

const
  n = 4;
var
  a:array[1..n] of char;
  i,j,k,l,z, count:integer;
begin
  a[1] := В;
  a[2] := И;
  a[3] := Н;
  a[4] := Т;
  count := 1;
 
  for i :=1 to n do
    for j := 1 to n do
      for k := 1 to n do
        for l := 1 to n do
          for z := 1 to n do
          begin
            writeln(count, .  , a[i], a[j], a[k], a[l], a[z]);
            if (count =1020) then
              Exit;
            inc(count);
          end;
end.