c语言程序运算题

1

x=1 y=2*sum*=3

10Squared is : 100

2

a=+00325 x=+3.141593e+000

3

c='K

4

a=12,b=345

反向推算

2x-1>65得到x>33 ............第芹芹一步 由历简于要进行四次运算，因此如下

2x-1>33得到x>17 ............第二嫌烂毕步

2x-1>17得到x>9 ............第三步

2x-1>9 得到x>5 ............第四步

由第三和第四步得5<x<=9

所以x=6.7.8.9

四个整数

1、以下程序是找出50以内所有能构成直角三角形的整数组。请完成程序。

Private Sub Command1_Click()

For a=1 To 50

For b=a To 50

c=Sqr(a^2+b^2)

If ____ And c=Int(c) Then Print abc

Next b

Next a

End Sub

答案 c<=50

===================================

【注】如果斜边c也小于50 且为整数，则满足！

===================================

2、以下程序是用来输出20个在开区间（10，87）上的随机整数R，每行输出4个整数。请完成程序。局明洞

Private Sub Command1_Click()

For i=1 To 10

R=Int(Rnd*76+11)

Print R

If ____ Then Print

next i

End Sub

答案 i Mod 4=0

===================================

【注】如果i能被四整除，说明此行已满四个，换行！

===================================

3、根据结果完善以下程序。

PRINT "NO.","NAME","CLASS"

PRINT "001",

____________

END

运行结果为:

NO. NAME CLASS

001LIST9013

答案 PRINT "LIST","9013"

===================================

【注】不全另两个槐烂输出，这个没什么好解释的。

===================================

4、下面桐枯程序是输出100~~200之间不能被3整除的数。请完成程序。

Private Sub Form_load()

x=100

Do Until x>200

If ____ Then

Text1.Text = Text1.Text &Str(x)

End If

x=x+1

Loop

End Sub

答案 x Mod 3<>0

===================================

【注】如果x不能被3整除。

===================================

5、下面程序实现使数78.693保留到小数点后一位和二位____。

a=78.693

x1= (1)

x2= (2)

PRINT "x1="x1,"x2="x2

END

答案 (1)INT(a*10+0.5)/10(2) INT(a*100+0.5)/100

===================================

【注】

（1） 先把数放大10倍，然后直接四舍五入，再缩小10倍

（2） 先把数放大100倍，然后直接四舍五入，再缩小100倍===================================

6、将任意组数的和进行四舍五入。

INPUT a,b

___________

PRINT "a+b"a+b

PRINT "INT(a+b+0.5)="x

END

答案 x=INT(a+b+0.5)

===================================

【注】求和，直接四舍五入。

===================================

7、以下程序用来输出10个数中的正数，请将正确的选项填入____中。

a: READ x

n=n+1

IF x>0 THEN PRINT x

IF _____ THEN GOTO a

DATA -5,-8,7,68,9,3,-5,-2,-1,34

END

答案n<10

===================================

【注】如果未满10个数，继续。

===================================

8、在窗体Form1中有两个文本框(Text1和Text2）和一个命令按钮Command1。在Command1_Click过程中要将两个文本框中的字符串连接成一个字符串，请完成程序。

Private Sub Command1_Click()

Print ____

End Sub

答案Text1.Text + Text2.Text

===================================

【注】字符串连接用“+”或者“&”

===================================

9、以下程序是计算10+20+……+50的值，请完成程序。

Dim x As Integer

Dim i As Integer

x=0

For i= ____ step 10

x=x+i

Next i

Print x

答案10 To 50

===================================

【注】限定数据范围10~~50

===================================

---