.


:




:

































 

 

 

 


2: ,




1000, - 00. , 0 100.

Teplo : eps Max; . :

 

//

Write('Eps='); readln(eps);

Write('Max='); readln(Max);

//

for i:=1 to M do

begin T[i,0]:=100-100/(M+1)*i; T[i,N+1]:=100/(M+1)*i end;

for j:=1 to N do

begin T[0,j]:=100-100/(N+1)*j; T[M+1,j]:=100/(N+1)*j end;

 

M=N=50. :

Eps=0.0001

Max=500

. ..

 

 

.3.36. 2-

 

500. .

 

3: , .

2 . , , : M=2N. =50, N=25. e Teplo .

, 0 100 . Teplo .

.3.37.

 

 

 

.3.37. 3-

 

.

 

 

1. Teplo ?

2. Teplo, , ?

3. Teplo, , ?

 

 

 
 

 

 





:


: 2015-11-23; !; : 1908 |


:

:

, .
==> ...

1959 - | 1781 -


© 2015-2024 lektsii.org - -

: 0.008 .