计算机在建筑工程中应用.docVIP

  • 9
  • 0
  • 约1.11千字
  • 约 3页
  • 2017-08-09 发布于重庆
  • 举报
计算机在建筑工程中应用.doc

计算机在建筑工程中的应用 1.简答计算机软件的设计过程 2.简答计算机图形系统的功能 1.已知一组数据可以用直线y = bx+c拟合, x 265 400 500 700 950 y 707 965 1179 1434 1672 试用最小二乘法求系数b、c。 2.阅读程序,并写出输出结果。 50 READ N 60 M=N+1 70 DIM A(N,M) 75 PRINT “MATRIX AND CONSTANT” 80 FOR I=1 TO N 90 FOR J=1 TO M 100 READ A(I,J) 105 IF J=M THEN 120 110 PRINT A(I,J) 120 NEXT J 130 PRINT??A(I,M) 140 NEXT I 150 PRINT 170 FOR J=1 TO N 175 P=0.0 180 FOR K=J TO N 185 IF ABS(A(K,J))=P THEN 200 190 P=ABS(A(K,J)) 195 I1=K 200 NEXT K 205 IF P=1E-10 THEN 230 210 PRINT 揘O UNIQUE SOLUTION?220 GO TO 500 230 IF I1=J THEN 280 235 FOR K=J TO M 240 X=A(J,K) 250 A(J,K)=A(I1,K) 260 A(I1,K)=X 270 NEXT K 280 Y=1.0/A(J,J) 290 FOR K=J TO M 300 A(J,K)=Y*A(J,K) 310 NEXT K 320 IF I=1 TO N 330 IF I=J THEN 380 340 Y=-A(I,J) 350 FOR K=J TO M 360 A(I,K)=A(I,K)+Y*A(J,K) 370 NEXT K 380 NEXT I 390 NEXT J 400 PRINT 揟HE SOLUTION IS?410 FOR I =1 TO N 420 PRINT 揦?I;??A(I,M) 430 NEXT I 440 DATA 3 450 DATA 3,6,9,12 455 DATA -3,4,-2,0 460 DATA 1,2,3,4 500 END COEFFICIENT MATRIX AND CONSTANT 3 6 9 = 12 -3 4 -2 = 0 1 2 3 = 4 THE SOLUTION IS NO UNIQUE SOLUTION

文档评论(0)

1亿VIP精品文档

相关文档