Комбинаторика - Помощь студентам

Dima170792 · 19.04.2011, 23:01

Доброго времени суток!Помогите пожалуйста с решением задачи по комбинаторике-весь форум обошёл-ничего толкового не нашёл!Мне нужно найти максимальное количество перестановок 6 книг!если не сложно-помогите!

MyLastHit · 19.04.2011, 23:03

Издеваешься? Чему равен факториал 6? И зачем здесь программу писать.

Dima170792 · 19.04.2011, 23:25

Цитата:

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

Издеваешься? Чему равен факториал 6? И зачем здесь программу писать.

Всё банально просто-для курсовой!

Dima170792 · 19.04.2011, 23:29

Цитата:

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

Издеваешься? Чему равен факториал 6?

=720
но мне нужен алгоритм счётчика перестановок!можеш-помоги,нет-так и скажи!

MyLastHit · 19.04.2011, 23:31

Тк язык не указан будем считать, что на паскале:

Код:

var p,i:integer;
p:=1;
for i:=1 to 6 do
p:=p*i;
writeln('Вот этот бред: ',p);
readln;
end;

wiki

Dima170792 · 19.04.2011, 23:33

[CODE]
Тк язык не указан будем считать, что на паскале:
[CODE]извини-забыл ,ты почти угадал-на delphi!

Dima170792 · 19.04.2011, 23:39

при переделке под delphi произошла ошибка класов String и Integer ,подскажи функцию перевода -вроде strtoint и inttostr?

MyLastHit · 19.04.2011, 23:56

StrToInt('строка') - преобразует строку к типу integer.
IntToStr(число) - преобразует целое число к типу string.
Если число не целое, то вместо Int - Float.

Код:

Label1.caption:='Вот этот бред: '+inttostr(p);

Dima170792 · 20.04.2011, 00:01

Ато в прикладном прогрммировании я ориентируюсь а в математических функциях-в delphi воплотить не могу!

19.04.2011, 23:01	#1
Dima170792 Пользователь Регистрация: 04.04.2011 Сообщений: 76	Комбинаторика Доброго времени суток!Помогите пожалуйста с решением задачи по комбинаторике-весь форум обошёл-ничего толкового не нашёл!Мне нужно найти максимальное количество перестановок 6 книг!если не сложно-помогите! Последний раз редактировалось Dima170792; 19.04.2011 в 23:47.

19.04.2011, 23:03	#2
MyLastHit Очень суровый Участник клуба Регистрация: 17.12.2009 Сообщений: 1,988	Издеваешься? Чему равен факториал 6? И зачем здесь программу писать. Ненавижу быть как все, но люблю, чтобы все были как я.

19.04.2011, 23:31	#5
MyLastHit Очень суровый Участник клуба Регистрация: 17.12.2009 Сообщений: 1,988	Тк язык не указан будем считать, что на паскале: Код: `var p,i:integer; p:=1; for i:=1 to 6 do p:=p*i; writeln('Вот этот бред: ',p); readln; end;` wiki Ненавижу быть как все, но люблю, чтобы все были как я.

19.04.2011, 23:39	#7
Dima170792 Пользователь Регистрация: 04.04.2011 Сообщений: 76	при переделке под delphi произошла ошибка класов String и Integer ,подскажи функцию перевода -вроде strtoint и inttostr? Последний раз редактировалось Dima170792; 19.04.2011 в 23:43.

19.04.2011, 23:56	#8
MyLastHit Очень суровый Участник клуба Регистрация: 17.12.2009 Сообщений: 1,988	StrToInt('строка') - преобразует строку к типу integer. IntToStr(число) - преобразует целое число к типу string. Если число не целое, то вместо Int - Float. Код: `Label1.caption:='Вот этот бред: '+inttostr(p);` Ненавижу быть как все, но люблю, чтобы все были как я.

19.04.2011, 23:33	#6
Dima170792 Пользователь Регистрация: 04.04.2011 Сообщений: 76	[CODE] Тк язык не указан будем считать, что на паскале: [CODE]извини-забыл ,ты почти угадал-на delphi!

20.04.2011, 00:01	#9
Dima170792 Пользователь Регистрация: 04.04.2011 Сообщений: 76	Большое тебе спасибо Ато в прикладном прогрммировании я ориентируюсь а в математических функциях-в delphi воплотить не могу!

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Комбинаторика	music66	Помощь студентам	13	18.04.2011 18:01
Комбинаторика	kiborrgg	Помощь студентам	6	25.03.2011 15:50
Комбинаторика	MadReason	Помощь студентам	4	09.12.2010 22:52
Комбинаторика	Васильева Зинаида	Помощь студентам	1	15.10.2010 18:55