Олимпиадная задача для Delphi 7. Teruski.

[Doctor_Program]

Значит, столкнулся я с одной задачей на олимпиаде по информатике 2013 года. Называется задача Teruski. Текст такой:

"Был такой народ-теруски. Они, как и римляни, использовали при написании чисел семь буков: A E I J O U и Y. Им удавалось так обозначить только числа от 1 до 5040. Каждое число записывалось в виде строки, длиной в семь символов. Так, AEIJOUY=1, AEIJOYU=2, AEIJUOY=3, а YUOJIEA=5040.
Нужно составить программу, которая бы определяла, как теруски записывали данное число."

Но это не всё. Нужно помочь не составить решение, а помочь с его объяснением. Вот код:

const f:array[1..6] of integer = (1,2,6,24,120,720);
  var i,j,k,n:integer;
      s:string;
      c:char;
begin
  readln(n); dec(n);
  s:='AEIJOUY';
  for i:=1 to 6 do begin
    k:=n div f[7-i];
    if k>0 then begin
      c:=s[i+k];
      for j:=i+k-1 downto i do
        s[j+1]:=s[j];
      s[i]:=c;
    end;
    n:=n mod f[7-i];
  end;
  writeln(s);
end.

Объясните пожалуйста данное решение. Хотелось бы конкретное объяснение каждой строки. Тем более не понятен массив: f:array[1..6] of integer = (1,2,6,24,120,720); Откуда вообще эти цифры(1,2,6,24,120,720)?
Ответьте пожалуйста в краткие строки, ибо на носу очередная олимпиада. Заранее благодарен)

[min@y™]

Откуда вообще эти цифры(1,2,6,24,120,720)?

Это факториалы чисел 1...6.

ибо на носу очередная олимпиада.

У вас, спортсменов-олимпийцев, там не принято, разве, дисквалифицировать за допинг?

[Doctor_Program]

Можно поподробнее про числа. Я, конечно, понимаю, что числа 1,2,6,24,120,720 имеют свой "номер", то бишь к ним можно обратиться, как к n-ному элементу массива. Мне не понятно- как их написали? Точнее, откуда??

[min@y™]

Сообщение от Doctor_Program

Можно поподробнее про числа. Я, конечно, понимаю, что числа 1,2,6,24,120,720 имеют свой "номер", то бишь к ним можно обратиться, как к n-ному элементу массива. Мне не понятно- как их написали? Точнее, откуда??

Ты в каком классе учишься, школота?
Неужели не в курсе, что такое факториал?

[Doctor_Program]

Неужели класс настолько важен??? Если да, то в 11. Но вы учтите, что о таком языке, как Паскаль в нашей школе и не слышали. Поэтому учу я его сам уже два месяца как. И на олимпиады посылали, не обучая.

Если бы меня обучали и я тунеядствовал, то понятно, это не простительно не знать, судя по вашей интонации, такой простой термин, как факториал

[Stilet]

Если бы меня обучали и я тунеядствовал, то понятно, это не простительно не знать, судя по вашей интонации, такой простой термин, как факториал

А факториал не относится к программированию - https://ru.wikipedia.org/wiki/%D0%A4...B8%D0%B0%D0%BB
Это чистая математика.

[Doctor_Program]

Ну уж извините, что я нубяра и ничего не знаю. Я думал, мне тут задачу распишут, а не критиковать и позорить будут...Я ведь не виноват, что нас не учили такому...

[Stilet]

Кто ж тебе виноват если ты самостоятельно учиться не желаешь, ожидая советского образования? )
Сейчас в наше время если сам усилия не приложишь ничего никто не даст.

[min@y™]

Паскаль в нашей школе и не слышали.

Это ж на каком из дальних островов папуа-гвинеи находится твоя школа? Покажи на карте.