- 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 T O 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)