[Dima170792]

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

факториал 6 по-моему
то есть, тебе нужно 1*2*3*4*5*6

именно-я уже нашел:

var p,i:integer;
p:=1;
for i:=1 to 6 do
p:=p*i;
Label1.caption:=максимальное количество перестановок 6 книг=: '+inttostr(p);


end;