Ctrl+V

[Elfevilx]

>>ВТТ топ двурук или для берса+16/300 на мамбу+16\300

[_Patrisha_]

[ultraKoTik]

ДомаСрачАЯкач

[_Patrisha_]

[xDOZERx]

Кнопка опробования запустит звонок только если все ввода получат сигнал о, аварии, звонок звенит прирывисто

[ХолоднаяОсоба]

1 Иногда раухтопазу приписываются успокаивающее воздействие, а также то, что он может помочь избавиться от стресса и боли

2 Считается, что украшения из дымчатого кварца снимают злобу и раздражительность

3 обладает способностью выводить негативную энергию, помогает при депрессивных состояниях.

4 Тот, кто носит камень, может улучшить функцию надпочечников, почек, поджелудочной железы.

[ХолоднаяКровь]

// Получили ответ. Парсим результат

[UAN]

(кот в ссоре с собственными лапами)

[БуйнаяОслица]

РІДНА ДОМІВКА. Згадуючи дитинство, проймаєшся дивними відчуттями. Якось щемно стає у грудях, коли згадуєш подвір’я, на якому зробив перші кроки. Невелике, затишне, повите виноградною лозою, воно ледве пропускало сонячні промені. Улітку захищало від спеки, взимку - від сніговіїв. Восени падолист застеляв землю пухким килимом, на якому бурюкалися ми, діти. А піднімеш голову вгору - налиті кетяги винограду. Ледь прибиті ранковою памороззю, яка стікала вдень прозорою краплею, виноградні грона здавалися прозорими, навіть насіння проступало крізь блідо-рожеву обо-лоночку і манило дитячу уяву. Тоді татко брав мене на руки, підіймав угору і я діставав губами стиглі виноградинки. А на дверях, притулившись до одвірка, стояла мама й удавано сердилася, побачивши моє замурзане личко. А потім ми всі весело сміялись. Навесні батько обрізав лозу - і подвір’я світлішало, щоб уже в травні зазеленіти знов.

Наш будинок був розташований на околиці селища й одним боком дивився на байрак. А на іншому боці яру височіли багатоповерхові будинки. Наш невеликий провулочок складався з одноповерхових будиночків приватної забудови і був невеличким острівцем краси і гармонії посеред великого гамірного міста.

Нашій сім’ї належала одна частина будиночка, з іншого боку височів сусідський паркан. Бабуся вважала, що цей паркан псує красу, і засаджувала його плетючими квітами. Коли зацвітала червона красоля та різнокольорові чашечки кручених паничів - паркан зникав, перетворюючись на барвистий яскравий килим. Невеличкий штахетник огороджував бабусин палісадник перед вікнами від вулиці. Чого там тільки не було! Квіти змінювалися залежно від сезону, наповнюючи подвір’я пахощами літа, але бабусиною гордістю завжди вважалися троянди. Вона вирощувала їх із пагінців, захищала від негоди, а коли вони зацвітали - не могла намилуватися ними. А одного разу вона виростила троянду-плетючку, колючу-колючу, але невимовно прекрасну. Мені найдужче подобався білий бузок, який ріс під вікном моєї кімнати. Бабуся посадила його на честь мого народження, але він обігнав мене в рості. Щороку на День Перемоги ми з бабусею ламали бузок і йшли до Меморіалу Слави. Бабуся підіймала мене на руки, і я клав білий букет до вічного вогню. А повертаючись додому, я бачив, як біліли бузкові квіти на фоні червоного цегляного будинку і ледь торкалися мого вікна. Навесні наш будинок змінювався, бо змінювався сад за ним. Спочатку він вирував білою завірюхою яблуневого і вишневого цвіту, трохи згодом потопав у зелені, а ще пізніше - у багрянці налитого плоду. Невеличкі віконця блищали чистими шибками, що зоріли і вабили різним теплом.

Звідти я пішов у перший клас, а коли батьки одержали квартиру у багатоповерховому будинку в іншому районі міста, я відмовився з ними переїжджати, залишившись жити у бабусі.

А тепер, коли бабусі не стало, я ходжу до школи в новому районі, де живуть мої батьки. Мені подобається і мій дім, і нова школа, і мої нові друзі. Але там, в старому районі, залишилося не тільки моє дитинство, а й часточка мене самого. Іноді навіть уявляю, що відчиняю хвіртку, а там на порозі стоїть бабуся і чекає на мене. Знаю, що чудес не буває, що минуле не повертається. Але в серці на все життя залишаться спогади про старенький чепурний будиночок, огорнений серпанком саду,- моя рідна домівка.

[22.12.2011 22:52:13] БуйнаяОслица: РІДНА ДОМІВКА. Згадуючи дитинство, проймаєшся дивними відчуттями. Якось щемно стає у грудях, коли згадуєш подвір’я, на якому зробив перші кроки. Невелике, затишне, повите виноградною лозою, воно ледве пропускало сонячні промені. Улітку захищало від спеки, взимку - від сніговіїв. Восени падолист застеляв землю пухким килимом, на якому бурюкалися ми, діти. А піднімеш голову вгору - налиті кетяги винограду. Ледь прибиті ранковою памороззю, яка стікала вдень прозорою краплею, виноградні грона здавалися прозорими, навіть насіння проступало крізь блідо-рожеву обо-лоночку і манило дитячу уяву. Тоді татко брав мене на руки, підіймав угору і я діставав губами стиглі виноградинки. А на дверях, притулившись до одвірка, стояла мама й удавано сердилася, побачивши моє замурзане личко. А потім ми всі весело сміялись. Навесні батько обрізав лозу - і подвір’я світлішало, щоб уже в травні зазеленіти знов.

Наш будинок був розташований на околиці селища й одним боком дивився на байрак. А на іншому боці яру височіли багатоповерхові будинки. Наш невеликий провулочок складався з одноповерхових будиночків приватної забудови і був невеличким острівцем краси і гармонії посеред великого гамірного міста

[TimesNewOmen]

3:58=Kaskade&c[section]=audio] Kaskade - Turn It Down

[Alexed]

Класно

[ДуплоКоня]

+,ASTERIOS 128kbps,http://188.120.246.31:8800/128,2,undefined

[ВеТерХаосА]

Пусто.

[Фрааклес]

ссыла с радикала(( сюда нельзя,такая картинка хорошая((

[GloomyGriMm]

Лог :Три шестёрки три девятки

Мой пароль я Сатана

[SAJFULLA]

метоксихлордиэтиламинометилбутиламиноакридинами

[Хексира]

дикой своей н

[eire2]

zxfvsdffffffffffsaf

[SAJFULLA]

http://forum.asterios.tm/index.php?showtopic=127312&pid=3106072&st=2580&#entry3106072

[Hekrofilka]

function lab3(enKEv, width, costh2)

n=78;NN=100;

[ENERGY s SE SN s1 s2 s3 s4 s5 s6]=textread('in.txt','%f %s %f %f %s %s %s %s %s %s');

ENERGY(strcmp(s,{'keV'}))=ENERGY(strcmp(s,{'keV'}))*1000;

ENERGY(strcmp(s,{'MeV'}))=ENERGY(strcmp(s,{'MeV'}))*1000000;

Z1=33;

M1=74.92;

Z2=14;

M2=28.0;

Np=0.05;

Gamma=(4*M1*M2)/((M1+M2)*(M1+M2));

E0=enKEv*1000;

Ec=0.01*E0;

Distr=zeros(1,NN);

first=width / NN +0.01;

step=width / NN;

for j=1:1000

Enew=E0;

E1=0.0;

E2=0.0;

Se1=0.0;

Se2=0.0;

x=0;

y=0;

OmegaX=1;

OmegaY=0;

OmegaZ=0;

while (Enew>Ec)&&(x>=0)

Enew;

for i=1:n

if (Enew>=ENERGY(i))&&(Enew<=ENERGY(i+1))

E1=ENERGY(i);

Se1=SE(i);

E2=ENERGY(i+1);

Se2=SE(i+1);

break;

end

end

Se=(Se1+(Enew-E1)*(Se2-Se1)/(E2-E1));

L=Np^(-1/3);

alpha=rand(1)*2*pi;

T=FindT(Enew,costh2,Z1,Z2,M1,M2);

Myu=M2/M1;

Tau=T/Enew;

if T > Enew*Gamma

continue;

end

CosTettaL = 0.5*(sqrt(1-Tau)+(1-Myu*Tau)/(sqrt(1-Tau)));

SinTettaL = sqrt(1-CosTettaL*CosTettaL);

a=zeros(3,3);

a(:,1)=[OmegaX;OmegaY;OmegaZ];

a(1,2)=-OmegaY/sqrt(OmegaX*OmegaX+OmegaY*OmegaY);

a(2,2)=OmegaX/sqrt(OmegaX*OmegaX+OmegaY*OmegaY);

norm=sqrt(OmegaX*OmegaX*OmegaZ*OmegaZ/((OmegaX*OmegaX+OmegaY*OmegaY)*(OmegaX*OmegaX+OmegaY*OmegaY))+OmegaY*OmegaY*OmegaZ*OmegaZ/((OmegaX*OmegaX+OmegaY*OmegaY)*(OmegaX*OmegaX+OmegaY*OmegaY))+1);

a(1,3)=-OmegaX*OmegaZ/(OmegaX*OmegaX+OmegaY*OmegaY)/norm;

a(2,3)=-OmegaY*OmegaZ/(OmegaX*OmegaX+OmegaY*OmegaY)/norm;

a(3,3)=1/norm;

OmegaNew=a*[CosTettaL;SinTettaL*cos(alpha);SinTettaL*sin(alpha)];

norm=sqrt(OmegaNew(1)*OmegaNew(1)+OmegaNew(2)*OmegaNew(2)+OmegaNew(3)*OmegaNew(3));

x=x+L*OmegaNew(1)/norm;

y=y+L*OmegaNew(2)/norm;

OmegaX=OmegaNew(1)/norm;

OmegaY=OmegaNew(2)/norm;

OmegaZ=OmegaNew(3)/norm;

Enew = Enew - L*Se - T;

end

for jj=1:NN

if (jj-1)*step+first>x

Distr(jj)=Distr(jj)+1;

break;

end

end

end

Distr=Distr/sum(Distr)*NN/100;

Trim=dlmread(strcat('Range_',int2str(enKEv),'kev_',int2str(width),'A.txt'),' ');

figure

Trim(:,3)=Trim(:,3)/sum(Trim(:,3));

plot(Trim(:,1),Trim(:,3),'r');

hold on

plot((1:NN)*step,Distr,'g');

grid on

title(['Energy=', num2str(enKEv), 'keV, cos(\theta/2)=',...

num2str(costh2), ',\newline Ion Average Range='...

num2str(Distr * ((1:NN)*step)' * 100 / NN)...

',\newline Ion Average Range (TRIM)='...

num2str(Trim(:,3)' * Trim(:, 1) )]);

end

function T=FindT(E,costh2,Z1,Z2,M1,M2)

Gamma=4*M1*M2/(M1+M2)^2;

Tmin=Gamma*E*(1-costh2^2);

eta=rand(1);

a=quad(@zbl,Tmin,Gamma*E,1.0e-2,0,E,Z1,Z2,M1,M2)*eta;

if eta>0.85

eps=0.1;

ra=Tmin;

rb=Gamma*E;

T=(ra+rb)/2;

f=quad(@zbl,Tmin,T,1.0e-1,0,E,Z1,Z2,M1,M2)-a;

while abs(ra-rb)>eps

if f>0

rb=T;

else

ra=T;

end;

T=(ra+rb)/2;

f=quad(@zbl,Tmin,T,1.0e-1,0,E,Z1,Z2,M1,M2)-a;

end

else

T=Tmin+0.0001;

Told=Gamma*E;

eps=0.01;

while (abs(T-Told)>eps)||(abs(f)>eps)

Told=T;

f=quad(@zbl,Tmin,Told,1.0e-2,0,E,Z1,Z2,M1,M2)-a;

T=Told-f/zbl(Told,E,Z1,Z2,M1,M2);

if T<Tmin

T=(Tmin+Told)/2;

end

end

end

end

function sigma=zbl(T,E,Z1,Z2,M1,M2)

A0 = 0.5292;

ee2 = 27.21*A0;

a_u=0.4685/(Z1^0.23+Z2^0.23);

a=1.138;

b=0.01328;

c=0.21226;

d=0.19553;

t=T*E*(M2/M1)*(2*Z1*Z2*ee2/a_u)^(-2);

A=1+a*t.^(1/2);

B=t.^(1/2)+b*t.^(c/2)+d*t.^(1/4);

C=1+b*c*t.^((c-1)/2)+0.5*d./t.^(1/4);

f=0.5*(log(A)./B+a*t.^(1/2)./A./B-t.^(1/2).*log(A).*C./B.^2);

sigma=pi*a_u^2/2*f./t.^(3/2)*E*(M2/M1)*(2*Z1*Z2*ee2/a_u)^(-2);

end

жесть

[SAJFULLA]

3,ё‰«q\±ЗvЃMeHuR¬ЎQЌмйmуАяПёzу Ў¬gHh¶Жzv…QH…СБАa€{єО|O%ВDжяшІGEТс+JНє·sФШД8¶Мей8ц¶С'€qZ?IC~щjю-3О|OZXDжя4 шЃчч+J¬ЎQ”б

гѓ^ГК“3гр5Bn••ЈfБп5“ИЦ1йхО|O<!}нxvЃфNLВляN„ЌмйЯ†ЬГК“ёzуэЄЫцЭD§Q¬~ъуўҐ#­}}о!РЧ@7±UђP¦HwоFЉЏРк+Ж3І[ё°#«б7ЮOМvs·fx¶»иА0€.Х/h'ґы"єШsmoЫщqЌ6ЛЛ3,Wџ7Гx[Щ”яСдҐeAПЊG*_ОЙ|,j·э~qщеҐPоЪF«пРg/]ьХќ…ЏџЭЗХЫ.^Љ†€‰тНЦC¤Ёк“­ytTдщoУЦьјМ>Њцѕ.U*в

[Hekrofilka]

3,ё‰«q\±ЗvЃMeHuR¬ЎQЌмйmуАяПёzу Ў¬gHh¶Жzv…QH…СБАa€{єО|O%ВDжяшІGEТс+JНє·sФШД8¶ Мей8ц¶С'€qZ?IC~щjю-3О|OZXDжя4 шЃчч+J¬ЎQ”б

гѓ^ГК“ 3гр5Bn••ЈfБп5“ИЦ1йхО|O< !}нxvЃфNL ВляN„ЌмйЯ†ЬГК“ёzуэЄЫцЭD§Q¬~ъуўҐ#­}}о!РЧ@7±UђP¦HwоFЉЏРк+Ж3І[ё°#«б7ЮOМvs·fx¶»иА0€.Х/h'ґы"єШsmoЫщqЌ6ЛЛ3,Wџ7Гx[ Щ”яСдҐeAПЊG*_ОЙ|,j·э~qщеҐP оЪF«пРg/]ьХќ…ЏџЭЗХЫ.^Љ†€‰тНЦC¤Ёк“­ytTдщoУЦьјМ>Њцѕ.U*в

явно екзешник пастил ))

[SAJFULLA]

[settings]

Components=000200ff

Location=

CfgFile=

RemoveIncompApp=1

[Сбеше4ка]

http://forum.asterios.tm/index.php?showtopic=201325&st=0#entry3116275

[simbasChildrin]

connect cs1.onmoon.ru:27960;password pcw

[DCcT]

713:24 Gadost': спасибо, друг-)

­

813:25 zinoviy: всегда пожалуйста!!))

[Vlad_Lab]

!ку)плю мастери 35 = 1г

[Niteris]

=Killswitch%20Engage&c[section]=audio]Killswitch Engage

[VincentLancaster]

Dim f As Short

[G0DFathеr]

function lab3(enKEv, width, costh2)

n=78;NN=100;

[ENERGY s SE SN s1 s2 s3 s4 s5 s6]=textread('in.txt','%f %s %f %f %s %s %s %s %s %s');

ENERGY(strcmp(s,{'keV'}))=ENERGY(strcmp(s,{'keV'}))*1000;

ENERGY(strcmp(s,{'MeV'}))=ENERGY(strcmp(s,{'MeV'}))*1000000;

Z1=33;

M1=74.92;

Z2=14;

M2=28.0;

Np=0.05;

Gamma=(4*M1*M2)/((M1+M2)*(M1+M2));

E0=enKEv*1000;

Ec=0.01*E0;

Distr=zeros(1,NN);

first=width / NN +0.01;

step=width / NN;

for j=1:1000

Enew=E0;

E1=0.0;

E2=0.0;

Se1=0.0;

Se2=0.0;

x=0;

y=0;

OmegaX=1;

OmegaY=0;

OmegaZ=0;

while (Enew>Ec)&&(x>=0)

Enew;

for i=1:n

if (Enew>=ENERGY(i))&&(Enew<=ENERGY(i+1))

E1=ENERGY(i);

Se1=SE(i);

E2=ENERGY(i+1);

Se2=SE(i+1);

break;

end

end

Se=(Se1+(Enew-E1)*(Se2-Se1)/(E2-E1));

L=Np^(-1/3);

alpha=rand(1)*2*pi;

T=FindT(Enew,costh2,Z1,Z2,M1,M2);

Myu=M2/M1;

Tau=T/Enew;

if T > Enew*Gamma

continue;

end

CosTettaL = 0.5*(sqrt(1-Tau)+(1-Myu*Tau)/(sqrt(1-Tau)));

SinTettaL = sqrt(1-CosTettaL*CosTettaL);

a=zeros(3,3);

a(:,1)=[OmegaX;OmegaY;OmegaZ];

a(1,2)=-OmegaY/sqrt(OmegaX*OmegaX+OmegaY*OmegaY);

a(2,2)=OmegaX/sqrt(OmegaX*OmegaX+OmegaY*OmegaY);

norm=sqrt(OmegaX*OmegaX*OmegaZ*OmegaZ/((OmegaX*OmegaX+OmegaY*OmegaY)*(OmegaX*OmegaX+OmegaY*OmegaY))+OmegaY*OmegaY*OmegaZ*OmegaZ/((OmegaX*OmegaX+OmegaY*OmegaY)*(OmegaX*OmegaX+OmegaY*OmegaY))+1);

a(1,3)=-OmegaX*OmegaZ/(OmegaX*OmegaX+OmegaY*OmegaY)/norm;

a(2,3)=-OmegaY*OmegaZ/(OmegaX*OmegaX+OmegaY*OmegaY)/norm;

a(3,3)=1/norm;

OmegaNew=a*[CosTettaL;SinTettaL*cos(alpha);SinTettaL*sin(alpha)];

norm=sqrt(OmegaNew(1)*OmegaNew(1)+OmegaNew(2)*OmegaNew(2)+OmegaNew(3)*OmegaNew(3));

x=x+L*OmegaNew(1)/norm;

y=y+L*OmegaNew(2)/norm;

OmegaX=OmegaNew(1)/norm;

OmegaY=OmegaNew(2)/norm;

OmegaZ=OmegaNew(3)/norm;

Enew = Enew - L*Se - T;

end

for jj=1:NN

if (jj-1)*step+first>x

Distr(jj)=Distr(jj)+1;

break;

end

end

end

Distr=Distr/sum(Distr)*NN/100;

Trim=dlmread(strcat('Range_',int2str(enKEv),'kev_',int2str(width),'A.txt'),' ');

figure

Trim(:,3)=Trim(:,3)/sum(Trim(:,3));

plot(Trim(:,1),Trim(:,3),'r');

hold on

plot((1:NN)*step,Distr,'g');

grid on

title(['Energy=', num2str(enKEv), 'keV, cos(\theta/2)=',...

num2str(costh2), ',\newline Ion Average Range='...

num2str(Distr * ((1:NN)*step)' * 100 / NN)...

',\newline Ion Average Range (TRIM)='...

num2str(Trim(:,3)' * Trim(:, 1) )]);

end

function T=FindT(E,costh2,Z1,Z2,M1,M2)

Gamma=4*M1*M2/(M1+M2)^2;

Tmin=Gamma*E*(1-costh2^2);

eta=rand(1);

a=quad(@zbl,Tmin,Gamma*E,1.0e-2,0,E,Z1,Z2,M1,M2)*eta;

if eta>0.85

eps=0.1;

ra=Tmin;

rb=Gamma*E;

T=(ra+rb)/2;

f=quad(@zbl,Tmin,T,1.0e-1,0,E,Z1,Z2,M1,M2)-a;

while abs(ra-rb)>eps

if f>0

rb=T;

else

ra=T;

end;

T=(ra+rb)/2;

f=quad(@zbl,Tmin,T,1.0e-1,0,E,Z1,Z2,M1,M2)-a;

end

else

T=Tmin+0.0001;

Told=Gamma*E;

eps=0.01;

while (abs(T-Told)>eps)||(abs(f)>eps)

Told=T;

f=quad(@zbl,Tmin,Told,1.0e-2,0,E,Z1,Z2,M1,M2)-a;

T=Told-f/zbl(Told,E,Z1,Z2,M1,M2);

if T<Tmin

T=(Tmin+Told)/2;

end

end

end

end

function sigma=zbl(T,E,Z1,Z2,M1,M2)

A0 = 0.5292;

ee2 = 27.21*A0;

a_u=0.4685/(Z1^0.23+Z2^0.23);

a=1.138;

b=0.01328;

c=0.21226;

d=0.19553;

t=T*E*(M2/M1)*(2*Z1*Z2*ee2/a_u)^(-2);

A=1+a*t.^(1/2);

B=t.^(1/2)+b*t.^(c/2)+d*t.^(1/4);

C=1+b*c*t.^((c-1)/2)+0.5*d./t.^(1/4);

f=0.5*(log(A)./B+a*t.^(1/2)./A./B-t.^(1/2).*log(A).*C./B.^2);

sigma=pi*a_u^2/2*f./t.^(3/2)*E*(M2/M1)*(2*Z1*Z2*ee2/a_u)^(-2);

end

жесть

это не паскаль....но чёто похожее в этом смИсле.....в паскале работаю не то