ANTICHAT — форум по информационной безопасности, OSINT и технологиям
ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию.
Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club,
и теперь снова доступен на новом адресе —
forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.

14.12.2007, 20:20
|
|
Новичок
Регистрация: 18.05.2007
Сообщений: 8
Провел на форуме: 46828
Репутация:
3
|
|
на 1000! она выдает ответ ~1 cек, компилятор делфи 7, проц атлон 3500+ (на правильность проверял малые тесты работала верно )
З.Ы. твоя прога 30! не вазьмет а по ресурсом буит хавать столькоже скока и моя (если динку допишешь)
З.З.Ы. я не думаю ято моя прога работает медленно паетотму я опустил красату и компактность кода
|
|
|

14.12.2007, 20:20
|
|
Участник форума
Регистрация: 04.05.2007
Сообщений: 267
Провел на форуме: 409147
Репутация:
33
|
|
~Lexx~ )))) опять флуд)))\
мне нужна работающая программа. все. )))) завтра смогу протестить прогу беефа
|
|
|

14.12.2007, 21:06
|
|
Banned
Регистрация: 20.06.2005
Сообщений: 880
Провел на форуме: 4610226
Репутация:
1332
|
|
>>К тому же в любом случае у тебя байт будет
>>умножаться на байт быстрее чем два байта на два
>>байта. (если не ошибаюсь где то на 25% быстрее).
вполне очевидно, что ДАЖЕ проходя два байта в два раза медленнее мы пройдем всю длину в два раза быстрее)
|
|
|

14.12.2007, 22:02
|
|
Участник форума
Регистрация: 30.09.2006
Сообщений: 165
Провел на форуме: 535407
Репутация:
57
|
|
Сообщение от Be0wuIf
на 1000! она выдает ответ ~1 cек, компилятор делфи 7, проц атлон 3500+ (на правильность проверял малые тесты работала верно )
З.Ы. твоя прога 30! не вазьмет а по ресурсом буит хавать столькоже скока и моя (если динку допишешь)
З.З.Ы. я не думаю ято моя прога работает медленно паетотму я опустил красату и компактность кода
Ты что в горестном епаме работаешь? Или всю жизнь на делфи работаешь? Ты считать умеешь? замени в моей программе лонгинт на экстендед - у тебя получиться больше 1500 элементов влазит в стек... программа выводиться за 1 секунду???? бля эт опо твоему скорость? Ты што упал? У меня на выполнение программы идет меньше восьмой части секунды - на третьем пне. Про динамическую память - ты вообще что-нибудь когда-нить на динамике писал? или в школе на уроках информатике услашыв, что такое ссылки и виртуальные методы возомнил себя программистом? Я вообще не понимаю о чем с тобой можно спорить, если ты не способен понять линейный итерационный алгоритм.
Что может быт ьпроще - каждый раз вычислять значение факториала - используя предыдущий факториал и тут же его суммировать... Неужели такие люди считают себя айтишниками... Это же простейшая программа класса 9. Оставь мечты стать программистом...
Какая к черту красота и компактонсть кода - жуткий гибрид рекурсии и неумелая попытка передавать ф процедуру глобальный параметр... тыб еще сразу его начил фигачить.
Прошу прощения у всех остальных пользователей - не сдержался.
Последний раз редактировалось ~Lexx~; 14.12.2007 в 22:04..
|
|
|

14.12.2007, 22:45
|
|
Новичок
Регистрация: 18.05.2007
Сообщений: 8
Провел на форуме: 46828
Репутация:
3
|
|
~Lexx~ если не трудно напиши свою прогу ибо из твоих рассуждений ничего не понял,а там посмотрим
|
|
|

14.12.2007, 23:23
|
|
Участник форума
Регистрация: 30.09.2006
Сообщений: 165
Провел на форуме: 535407
Репутация:
57
|
|
ой мама родите меня обратно
дубль три) Uses crt;
var i,n:integer;
fact,sum:extended;
Begin ClrScr;
Writeln('vvedite chislo');
Readln(n);
sum:=0;
fact:=1;
for i:=1 to n do begin
fact:=fact*i;
sum:=sum+fact;
end;
writeln(sum);
readln;
end.
|
|
|

14.12.2007, 23:32
|
|
Новичок
Регистрация: 18.05.2007
Сообщений: 8
Провел на форуме: 46828
Репутация:
3
|
|
последний вопрос , а с точностью что ты будешь делать?
|
|
|

14.12.2007, 23:37
|
|
Участник форума
Регистрация: 30.09.2006
Сообщений: 165
Провел на форуме: 535407
Репутация:
57
|
|
во первых какя тебе нужна точность? если тебе так нужно - завтра послезавтра выложу специальн одля тебя по человечески сделанную с пользовательскими типами и переопределением методов.
Вот как бы появилось пару вопросов по твоей прогрмме - а зачем ты крепишь текстовый файл? для понта? во вторых - у тебя сразу же пойдет переполнение стэка - подумай почему. Вернее не сразу, а когда оно начнет считать.
Последний раз редактировалось ~Lexx~; 14.12.2007 в 23:44..
|
|
|

15.12.2007, 00:14
|
|
Moderator - Level 7
Регистрация: 17.05.2007
Сообщений: 220
Провел на форуме: 3013539
Репутация:
441
|
|
Сообщение от ~Lexx~
ой мама родите меня обратно
дубль три) Uses crt;
var i,n:integer;
fact,sum:extended;
Begin ClrScr;
Writeln('vvedite chislo');
Readln(n);
sum:=0;
fact:=1;
for i:=1 to n do begin
fact:=fact*i;
sum:=sum+fact;
end;
writeln(sum);
readln;
end.
аха-ха жжёшь) а если у тебя n за maxint выйходит?) и ты конечно крут с extended, если у тебя будет найти сумму 1!+..+n! где n=100000, то ты пролетишь))))
Последний раз редактировалось VERte][; 15.12.2007 в 00:42..
|
|
|

15.12.2007, 00:41
|
|
Новичок
Регистрация: 18.05.2007
Сообщений: 8
Провел на форуме: 46828
Репутация:
3
|
|
текстовые делал тамучто мне так тестить было удобней , на практике переполнения не было , обьесни почему оно буит...
|
|
|
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|