Методы математической физики. Куликова И.В - 14 стр.

UptoLike

b(n) = Tenv;
end
TT=b/a';
T=zeros(I,J);
for i=1:I
for j=1:J
T(i,j)=TT(i+(j-1)*I);
end
end
meshc(Y,X,T)
grid on
xlabel('y, m')
ylabel('x, m')
zlabel('K')
axis([min(Y) max(Y) min(X) max(X) (min(min(T))-10)
max(max(T))])
0
0.1
0.2
0.3
0
0.1
0.2
290
295
300
305
310
315
320
325
330
y, m
x, m
K
Рисунок 7 – Распределение температуры балке с поперечным квадратным
сечением и источником тепла
14