⑴ 求高手給出一維熱傳導方程解的圖形的matlab代碼
function main
%熱傳導方程的差分解法
lda=0.000015;%lad即為a^2
l=50;
h=0.05;%空間步長
alpha=0.5;
tao=alpha*h^2/lda; %時間步長
N=l/h;%空間步數
M=100;%時間步數,由於你條件沒有限制,所以我隨便取了個值
for i=1:N+1
u(1,i)=fai((i-1)*h);
end
for k=1:M
u(k,1)=g1(k*tao);
u(k,N+1)=g2(k*tao);
end
for k=1:M
for i=2:N
u(k+1,i)=alpha*u(k,i+1)+(1-2*alpha)*u(k,i)+alpha*u(k,i-1);
end
plot([0:h:l],u(k+1,:));
hold on; pause(0.05);
end
function u=fai(x)
u=100;
function u=g1(x)
u=0;
function u=g2(x)
u=0;
就這個拉,你試試看行不,不行的話在聯系我吧!!
⑵ C語言編程(一維下料問題):某廠有一批長度為7.4m的鋼管原材料(數量充分多)
先看有幾種下料方法 按照你給鬧逗的長度排列 可碧凱能的方悔彎喚法有(數字表示切割成零件的個數 我們排除掉那些留下余料還可以切割的情況 否則就會太復雜)
2 0 0
1 2 0
1 1 1
1 0 2
0 3 0
0 2 1
0 1 3
0 0 4
下面是程序
model:
sets:
method/1..8/:n;
parts/1..3/:;
link(method,parts):m;
endsets
data:
m=
2 0 0
1 2 0
1 1 1
1 0 2
0 3 0
0 2 1
0 1 3
0 0 4;
enddata
min=@sum(method:n);
@for(parts(j):@sum(method(i):m(i,j)*n(i))>=200);
@for(method:@gin(n));
end
⑶ C語言一維數組求平均值
C語言一維數組求平均值的源代碼如下:
#include#define N 10
typedef int TYPE;
TYPE sum(TYPE a[],int n)
{
TYPE s=0;
int i;
for(i=0;ia[j]
{
temp=a[i];
a[i]=a[j];
a[j]=temp;
}
int main()
{
(3)一維下料問題代碼擴展閱讀
數組的初始化
1、在定義數組時對數組元素賦以初值,如:static int a[4]={1,2,3,4}。給一部分元素賦初值,如static int b[10]={1,2}。
2、對static數組不賦初值,系統會對所有數組元素自動賦以0值。
3、若對全部數組元素賦初值時,可以不指定數組長度,如:int c[]={1,2,3,4,5}。
4、若被定義數組長度與提供初值的個數不相同,則數組長度不能忽略。