Antichat снова доступен.
Форум Antichat (Античат) возвращается и снова открыт для пользователей.
Здесь обсуждаются безопасность, программирование, технологии и многое другое.
Сообщество снова собирается вместе.
Новый адрес: forum.antichat.xyz
 |
|
02.04.2010, 00:05
|
|
Участник форума
Регистрация: 18.07.2009
Сообщений: 278
Провел на форуме:
3055344
Репутация:
259
|
|
ну конечно, опять полный игнор.... такое ощущение что это мне ппц как нужна эта прога(((
|
|
|
02.04.2010, 00:10
|
|
Познающий
Регистрация: 17.02.2010
Сообщений: 45
Провел на форуме:
195184
Репутация:
47
|
|
Сообщение от EndLeSSDre@M
если я правильно догнал, то: надо тупо найти площадь поля, потом разделить ее на N и потом искать наибольший целый корень из этого, тем самым мы находим максимальную сторону квадрата.... так? уточни если я правильно думаю
Нет, не правильно, даже тот же тест с 100 на 100 и n = 3. Ответ получиться 57, а не 50, потому что оставшееся часть площади тоже распределяется по квадрату, а не должна
|
|
|
|
02.04.2010, 00:26
|
|
Постоянный
Регистрация: 12.05.2009
Сообщений: 395
Провел на форуме:
4761503
Репутация:
229
|
|
Сообщение от crazyserega1994
Код HTML:
for i:=1 to 3 do
begin
sleep(5000);
page:=W.Get('http://antigate.com/res.php?key=atatatata&action=get&id='+capid);
if pos('|',page) > 0 then
begin
showmessage('captcha found');
position:=pos('|',page);
delete(page,1,position);
capnumber:=page;
showmessage(capnumber);
Exit;
end;
end;
showmessage('EVERYTHING IS FINE FTW?');
Есть этот цикл, я раставил 3 showmessages чтобы посмотреть где скрипт не работает, в самом цикле все нормально, все 2 мессаги показуется, а вот showmessage('EVERYTHING IS FINE FTW?'); которая за цыклом не работает, и весь за ней код тоже, WTF? Возможно вся фишка в вызове операции Exit;?)
|
|
|
|
02.04.2010, 00:37
|
|
Познающий
Регистрация: 17.02.2010
Сообщений: 45
Провел на форуме:
195184
Репутация:
47
|
|
Qb1024...вот, вроде так
PHP код:
function min(a , b: integer): integer;
begin
min:=a;
if b<a then min:=b;
end;
var
n, i, k, m, rez: integer;
begin
readln(k, m);
readln(n);
rez:=0;
For i:=1 to min(k, m) do
if ((k div i) * (m div i)>=n) then rez:=i;
writeln(rez);
readln;
end.
|
|
|
|
02.04.2010, 05:44
|
|
Участник форума
Регистрация: 07.02.2010
Сообщений: 189
Провел на форуме:
870084
Репутация:
79
|
|
crazyserega1994, ну и правильно, что не выполняется. Exit используется для выхода из подпрограммы, а в основном блоке это эквивалентно завершению всей программы.
Для выхода из цикла используй break;
|
|
|
|
02.04.2010, 18:04
|
|
Участник форума
Регистрация: 15.07.2009
Сообщений: 200
Провел на форуме:
147171
Репутация:
2
|
|
Сообщение от Soherox
Qb1024...вот, вроде так
PHP код:
function min(a , b: integer): integer;
begin
min:=a;
if b<a then min:=b;
end;
var
n, i, k, m, rez: integer;
begin
readln(k, m);
readln(n);
rez:=0;
For i:=1 to min(k, m) do
if ((k div i) * (m div i)>=n) then rez:=i;
writeln(rez);
readln;
end.
пасиб, затестим.
Просто я редко онлайн бываю, поэтому и отвечаю неоперативно.
Спасибо! Вреде всё правильно работает!
Последний раз редактировалось Qb1024; 02.04.2010 в 19:40..
|
|
|
|
02.04.2010, 21:59
|
|
Познающий
Регистрация: 26.12.2007
Сообщений: 34
Провел на форуме:
150392
Репутация:
8
|
|
Сообщение от fenixelite
crazyserega1994, ну и правильно, что не выполняется. Exit используется для выхода из подпрограммы, а в основном блоке это эквивалентно завершению всей программы.
Для выхода из цикла используй break;
Та уже понял, опечатку сделал ;3
|
|
|
|
02.04.2010, 22:34
|
|
Познающий
Регистрация: 26.12.2007
Сообщений: 34
Провел на форуме:
150392
Репутация:
8
|
|
Много уже видел многопоточные брутеры, регерры и т.п. но никак не могу понять, как делать программу многопоточной в делфи? МОжет есть статья какайнить или учебник/урок? Какой компонент используется?
|
|
|
|
02.04.2010, 22:44
|
|
Участник форума
Регистрация: 18.07.2009
Сообщений: 278
Провел на форуме:
3055344
Репутация:
259
|
|
Сообщение от crazyserega1994
Много уже видел многопоточные брутеры, регерры и т.п. но никак не могу понять, как делать программу многопоточной в делфи? МОжет есть статья какайнить или учебник/урок? Какой компонент используется?
Поиск в гугле со словами "Delphi Многопоточные приложения" и се! неужели так трудно? *не в обиду*
|
|
|
|
02.04.2010, 22:54
|
|
Участник форума
Регистрация: 02.07.2008
Сообщений: 132
Провел на форуме:
1035284
Репутация:
52
|
|
|
|
|
|
|
|
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|
Похожие темы
Линейный вид
