某建筑地基及地层为淤泥质粘土.doc

某建筑地基的地层为淤泥质粘土，固结系数为Ch=Cv=1.810-3cm2/s，粘聚力c=18kPa，内摩擦角f=5，受压土层厚20m，袋装砂井直径dw=700mm，袋装砂井按等边三角形布置，间距l1.4m，深度H=20m，砂井底部为不透水层，砂井打穿受压土层。预压荷载总压力P=100kPa，分两级等速加载，如图所示，计算地基堆载120天后，地层的平均固结度(不考虑竖井井阻和涂抹的影响)，并判断在建筑荷载(假设为条形基础，基础埋深为0m)为150kPa时，地基中各点是否破坏？C程序如下：#include #includevoid main()double a,b,c,f,d,g,Fn,D,l,C1,C2,B,m,n,w,x,temp1,temp2;int t,H;double T20,r10,Q10,p10,U10,o10;double sum=0;int q10;int i,j;printf(请输入砂井直径、间距、固结系数、深度n);scanf(%lf,%lf,%lf,%lf,%d,&w,&l,&C1,&C2,&H);D=1.05*l; x=D/w;a=x*x;b=x*x-1;c=a/b;f=log(x);d=c*f;g=(3*a-1)/(4*a);Fn=d-g;temp1=(3.14*3.14*C1)/(4*H*H);temp2=(8*C2)/(Fn*D*D);B=(temp1+temp2)*86400; m=exp(-120*B); n=0.81/B*m;printf(请输入加载次数n);scanf(%d,&t);printf(请输入加载时间n);for(i=0;i=(2*t-1)break;printf(请输入加载数n);for(j=0;j=(t-1)break;for(i=0,j=0;i20,j=t&i=2*t)break;rj=Ti+1-Ti;Qj=qj/rj;oj=exp(B*rj);pj=exp(B*Ti)*(oj-1);Uj=Qj/100*(rj-n*pj); sum=sum+Uj;printf(%lf,sum);i+;加载次数每次加载数及各次加载起止时间固结度11000.9483020230700.916206304434030300.909808303650564303030100.890806303650567072530202020100.8523063034505470749092结论：固结度随着加载次数的增大而减小。6040加载速率固结度053033.3120.93930103036.660.9361015304040.93250203043.330.92880253046.62.40.9248结论：固结度随着加载速率的减小而减小。CvCh固结度0.00180.00010.30470.00110.82930.00210.95620.00310.98830.00410.9967结论：固结度随着水平固结系数的增大而增大。间距固结度1000.99681300.95931500.90451700.83551900.7631结论：固结度随着井间距的增大而减小。井径固结度100.7976600.92371100.96311600.98192100.9914结论：固结度随着井径的增大而增大。