10 READ A,B
20 READ X,Y
30 GOTO 60
40 LET X=X*X
50 LET Y=Y*Y
55 PRINT X,Y
60 LET X = A*X
70 LET Y=B*Y
75 PRINT X,Y
80 DATA 5,4,3,2
90 END
-----------------------------------Output----------------------------------
15 8
20 READ X,Y
30 GOTO 60
40 LET X=X*X
50 LET Y=Y*Y
55 PRINT X,Y
60 LET X = A*X
70 LET Y=B*Y
75 PRINT X,Y
80 DATA 5,4,3,2
90 END
-----------------------------------Output----------------------------------
15 8
Comments
Post a Comment