CAD程序设计作业 从键盘任意输入一个长度为10的实型数组,判断其中大于0、小于0和等于0的元素个数CAD程序设计作业从键盘任意输入一个长度为10的实型数组,判断其中大于0、小于0和等于0的元

来源:学生作业帮助网 编辑:作业帮 时间:2024/04/30 13:02:43
CAD程序设计作业 从键盘任意输入一个长度为10的实型数组,判断其中大于0、小于0和等于0的元素个数CAD程序设计作业从键盘任意输入一个长度为10的实型数组,判断其中大于0、小于0和等于0的元

CAD程序设计作业 从键盘任意输入一个长度为10的实型数组,判断其中大于0、小于0和等于0的元素个数CAD程序设计作业从键盘任意输入一个长度为10的实型数组,判断其中大于0、小于0和等于0的元
CAD程序设计作业 从键盘任意输入一个长度为10的实型数组,判断其中大于0、小于0和等于0的元素个数
CAD程序设计作业
从键盘任意输入一个长度为10的实型数组,判断其中大于0、小于0和等于0的元素个数

CAD程序设计作业 从键盘任意输入一个长度为10的实型数组,判断其中大于0、小于0和等于0的元素个数CAD程序设计作业从键盘任意输入一个长度为10的实型数组,判断其中大于0、小于0和等于0的元
Sub kkk()
Dim vr(9) As Double
Dim n As Integer
n = 0
Dim m As Integer
m = 0
Dim mn As Integer
mn = 0
For i = 0 To 9
Dim a As Integer
a = ThisDrawing.Utility.GetInteger("请输入一个整数:" & vbLf)
vr(i) = a
If a > 0 Then
n = n + 1
End If
If a = 0 Then
m = m + 1
End If
If a < 0 Then
mn = mn + 1
End If
Next
Dim vrst As String
For j = 0 To 9
vrst = vrst & vbLf & vr(j)
Next
str1 = "大于0的数有:" & n & "个" & vbLf & "等于0的数有:" & m & "个" & vbLf & "小于0的数有:" & mn & "个"
MsgBox "你输入的数依次为:" & vbLf & vrst & vbLf & str1
End Sub

CAD程序设计作业 从键盘任意输入一个长度为10的实型数组,判断其中大于0、小于0和等于0的元素个数CAD程序设计作业从键盘任意输入一个长度为10的实型数组,判断其中大于0、小于0和等于0的元 四、程序设计题(每题10分,1、(10分)从键盘任意输入一个4位数x,编程计算x的每一四、程序设计题(每题10分,1、(10分)从键盘任意输入一个4位数x,编程计算x的每一位数字相加之和(忽略 VB程序设计,从键盘任意输入一个X的值,求以下分段函数的值:(30分):Y=X+2(X>0) Y=0(X=0) Y=X2 (X 一道C语言作业:从键盘上任意输入10个数 求奇数平均值 偶数平均值 vf程序设计从键盘上输入一个三位数,若该数能被3整除且末尾数为5则显示该数,否则显示该数不符合要求 入门c语言题:从键盘上输入任意一个整数,然后输出它的绝对值 从键盘上任意输入一个4位正整数,然后逆序数输出 VF程序设计编程问题1,从键盘上任意输入10个数,分别求出其中的奇数的积和偶数的和.2.,从键盘任意给定一串字符,分别统计出其中大写字母,小写字母以及其他键盘字符的个数3,求100以内所有的 从键盘上输入任意一个整数n,计算1到n的和.输入 从键盘输入任意整数n.输出1到n的和.用c语言从键盘上输入任意一个整数n,计算1到n的和.输入从键盘输入任意整数n.输出输出1到n的和.用c语言( c程序设计:输入一个任意整数,逆序输出该数各位数字. C从键盘上输入任意两个数和一个运算符(+、-、*、/),* 根据输入的运算符对两个数计算,并输出结果从键盘上输入任意两个数和一个运算符(+、-、*、/),* 根据输入的运算符对两个数计算, 编写程序从键盘任意输入一个4位数x,编程计算X的每一个数字相加之和(忽略整数前的正负号) 有一个数组序列:34,67,12,99,5,从键盘中任意输入一个数据,判断数列中是否包含此数 1、编写程序,利用函数重载求整数绝对值和实数绝对值.要求从键盘上输入求绝对值的数.C++程序设计 pascal程序设计 输入一个整数n,n 从键盘任意输入一个4位数x,编程计算X的每一位数字相加之和(忽略整数前的正负号). 从键盘上输入任意一个整数,并输出其绝对值,用C语言程序怎么写,正确必采纳,快 编写一个程序,功能是:从键盘上输入任意两位整数,将其十位数字与个位数字交换位置后输出