Да я сама доброта)
Беляшик Беляшик 07.10.201523:31 ответить ссылка ↑
Хех, неплохая статья) можно подобрать)
Беляшик Беляшик 07.10.201523:08 ответить ссылка ↑
Тоже верно, но я чисто ради науки и эксперимента делал - заодно вспомнить паскаль
Беляшик Беляшик 07.10.201522:53 ответить ссылка ↑
Эту цифру изменить можно на любую в пределах возможностей переменной Integer
assign<t,* keys.txt*> rewrite<t>; Debug Tools Options Mindow T A jfll > tceygen ж 1 1 Упорядочить ▼ Открыть ▼ Общий доступ ▼ 7 Печать Записать на оптический диен Л Избранное ____________ Free Pascal IDE Дата изменения В ц^-F for i:= to 501 do begin for a:= to 4 do begin for v:= to
Беляшик Беляшик 07.10.201522:51 ответить ссылка ↑
Сотню за пару секунд смогешь?
Беляшик Беляшик 07.10.201522:42 ответить ссылка ↑
Таки да) я ж так, попробовать)
Беляшик Беляшик 07.10.201522:14 ответить ссылка ↑
Просто рандомить цифры и буквы никак не хотел вместе, поэтому пришлось его "ограничивать" в выборе
Беляшик Беляшик 07.10.201522:12 ответить ссылка ↑
Я просто в последний раз этим занимался примерно года 4 назад, пытался вспомнить. А цифры это из кодовой таблицы ASCII.
0- 16- ► 1- © 17 - i 2- е 18 - X 3- V 19 -!! 4- ♦ 20-1 5-А 21 - § 6-* 22-- 7- 23 -t 8- 24-t 9- 25 - i 10- 26 - -> 11 - 27-4- 12- 28-- 13- 29-« 14 -fl 30-^ 15-0 31 - ^ 16-^ 32- . 48-0 - ! 49-1 •i 50-2 -# 51-3 -$ 52-4 - % 53-5 -& 54-6 i 55-7 -( 56-8 -) 57-9 * 58- : - +
Беляшик Беляшик 07.10.201522:11 ответить ссылка ↑
Я ж написал - КРАЙНЕ МАЛА)
Беляшик Беляшик 07.10.201522:07 ответить ссылка ↑
В том и прикол что придумывать уже не придется - прогга сама напишет, а тебе только вбивать придется
Беляшик Беляшик 07.10.201522:03 ответить ссылка ↑