gaiver123

Хех я когда то давно её на своём старом компе проходил, а под конец игры после титр встал и всех убил)))))

На Вики инфа что 1С выпускает. Sheogorath,Salavatxxx у меня всё норм на Icore3 radeon hd5770 1gb на max )))

у меня тож всё норм и яркой стала, просто такая локация была наверное

у меня почему то игра не такая яркая как на скринах((, хотя и на максимальных

Мдааа игра шедевральная, но щас бы туда графу немного получше и я б её до дыр заиграл)) Кстати вы заметили что тут только люди с большим стажем рега на улановке-истинные ценители )))

нет там был труп какого то ватного джедая, которого замочили ящерки

всё больше не требуется, сдал курсач народ снова Неlр!!!Унёс эту прогу преподу,она сказала что нужно взять уравнение второго порядка попроще с готовым точным решением и изменить прогу с заменой на новое уравнение. Кстати, я забыл что там должно быть 2 нач. условия(1-для у0,а 2 для у'0).Как изменить эту прогу с учётом всех выше перечисленных изменений? Неправильно сформулировал. Вернее куда там совать второе условие, где оно там используется?

ну я в обычке его помесил, потом в демоне (ну меньше 5 минут сто пудово)

тебе нужно превратиться в демона

ну ароде да, книгу почитал первые значения находятся по этим формулам. Спасибо, всё работает.

народ помогите, я вроде еле как программу составил, а она некоторые значения не выводит. program Kursovaya; uses crt; var yo,y,yt,x: array [0..100] of real; func1,func,o,pogr,e,yss,q,p,r,h:real; n,a,b,i:integer; function fc(x,y:real):real; var l:real; begin yss:=cos(x+y)+0.5*(x+y); l:=yss; fc:=l; end; begin clrscr; writeln('vvedite znachenie koncov otrezka'); writeln('a='); read(a); writeln('b='); read(; writeln('vvedite y[0]'); writeln('y[0]='); read(y[0]); writeln('vvedite kol-vo shagov'); writeln('n='); read(n); begin h:=(b-a)/n; x[0]:=a; x[n]:=b; for i:=1 to n-1 do x:=x[0]+i*h; end; begin yo[0]:=y[0]-h*fc(x[0],y[0]); yo[1]:=y[0]+h*fc(x[1],y[0]); for i:=2 to 5 do yo:=y[0]+2*h*fc(x,y[0]); end; begin for i:=0 to 5 do y:=yo; end; begin for i:=5 to n-1 do func:=67*fc(x,y)-8*fc(x[i-1],y[i-1])+122*fc(x[i-2],y[i-2]-8*fc(x[i-3],y[i-3])+67*fc(x[i-4],y[i-4])); y[i+1]:=y+y[i-4]-y[i-5]+sqr(h)/48*(func); begin yt[0]:=y[0]-h*fc(x[0],y[0]); yt[1]:=y[0]+h*fc(x[1],y[0]); for i:=2 to 3 do yt:=y[0]+2*h*fc(x,y[0]); end; begin for i:=0 to 3 do y:=yt; end; for i:=3 to n-1 do func:=(fc(x[i-3],y[i-3])+fc(x[i-2],y[i-2])+fc(x[i-1],y[i-1])+fc(x,y)); func1:=17*(func)+232*fc(x,y)+222*fc(x[i-1],y[i-1])+232*fc(x[i-2],y[i-2])+17*fc(x[i-3],y[i-3]); yt[i+1]:=y+y[i-2]-y[i-3]+sqr(h)/240*(func1); end; begin for i:=0 to n do o:=abs(y)-abs(yt); o:=abs(o); writeln('pogreshnost ravna ',o:5:2); for i:=-1 to n-1 do writeln(x[i+1]:5:2,' y[',i+1,']=',y[i+1]:5:2,' yt[',i+1,']=',yt[i+1]:5:2,' ',o:5:2); end; end. посмотрите плз,только не надо структуру менять, только тот фрагмент где не выводит, может я где-то накосячил

кстати да, кто сколько их убивал, я нашёл толи 2 ,толи 3

Ну этож репак, пхд он файлы должен распаковать установочные, а после удалить.Возможно места не хватает для их извлечения=))

не добежала))

а у меня вопрос: почему рейтинг убрали(звёздочки по-моему были), их убрали года 2 назад?

TERMINOR это полная, но только сырая

Специально для olege92:не требуется

Ну да краевое условие самому в проге нужно задавать y[0], отсюда f[0], просто с этой рекурсивной функцией у меня нелады, так что если можешь, то объясни поподробней про неё. Вот моя функция y'=cos(x+y)+0,5(x-y) и как с ней проделывать эти операции не пойму

ну это-то я понял просто как найти эту самую f и y[n+1] емсли мне именно его и над найти

Нужно запрограммировать метод Адамса-Штёрмера. Я вроде начал, но застрял на основной формуле Вобщем там y[n+1]=...+h*h/240*(f[n+1]+...) Вот зздесь я понять не могу как найти эту функцию f[n+1], которая зависит от х и у, по-моему даже от y[n+1]. В итоге получается одно уравнение и 2 неизвестных.

попробуй дрова обновить

только у тебя

CoolNero ну дык и я не говорю что он сложный, я говорю что если у кого то рууки не из того места растут они понадобятся(без обид))))

на сибе видео есть где все части доспехов брать, ну да доспехи читерные,но на последнем боссе ваще решают если всё время под раздачу попадать))

markalex78 просто гарпуном подтягивайся и бей, уклоняйся и бей, а потом она шарики выпустит цепляйся за него гарпуном когда синим станет, потом к силите и смотри ролик