Исмаилов Б. Р. Техногенді сипаттағы апаттарды модельдеу және бағалау пәнінен дәрістер жинағы



бет39/41
Дата25.04.2022
өлшемі1.37 Mb.
#32224
1   ...   33   34   35   36   37   38   39   40   41
2.Сандық нәтижелерді талқылау
Program M;

Var t:array [1..5] of real; Y: array [1..5] of real;

i: integer; S, P, P1, S1, N, a0, a1, k, k1: real;

Begin


S:=0;

P:=1;


P1:=0;

S1:=0;


for i:=1 to 5 do begin

read (t[i], Y[i]);

S:=S+t[i];

P:=P+Y[i];

S1:=S1+sqr(t[i]);

P1:=P1+t[i]*Y[i];

End;

a1:=(N*P1-P)/(N*S1-S);



a0:=(P-a1*S)/N;

k:=exp(a0);

k1:=a1;

write (k,k1);

End.
Қорытынды ақпарат

Бастапқы және шектік шарттары берілген турдуленттік диффузияның жартылай эмпирикалық теңдеуін қолдану негізінде құрылған турбуленттік атмосферадағы белсенді қоспаның ыдырау моделінің ұқсас басқа да модельдермен нақты салыстырмалы талдауы келесі параграфта келтірілген.


Қолданылған әдебиеттер

[5],[7].

15 Дәріс
Сабақтың тақырыбы: Бастапқы және шектік шарттары берілген турбулентті диффузияның жартылай эмпирикалық теңдеуін сандық тәсілмен шешу



Достарыңызбен бөлісу:
1   ...   33   34   35   36   37   38   39   40   41




©emirsaba.org 2022
әкімшілігінің қараңыз

    Басты бет