作者crm123 (CRM)
看板Visual_Basic
标题[VB6 ] 主控台 输入数字
时间Mon Oct 31 01:51:09 2011
1.从主控台上任意输入一个介於10000~99999的5位数正整数
a)将这个5位数依序列印於一行中 数字与数字之间差3个字元间隔
b)将这个5位数反序列印於一行中 数字与数字之间差3个字元间隔
c)将这个5位数每个位数相加,并将结果列印於主控台萤幕上
d)将这个5位数每个位数相乘,并将结果列印於主控台萤幕上
2.必须使用 主控台萤幕方件执行与输出
3.指令注解范例如下
Dim Sum As Integer ‘宣告数字总和变数Sum
Dim Number1 As Integer ‘宣告第一个数字变数 Number1
Dim Number2 As Integer ‘宣告第二个数字变数 Number2
Sum = Number1+Number2 ‘执行两个整数的加法运算
Print Sum ‘将总和列印於表单上
4.范例
请输入一个五位数的正整数: 12345
>> 输入的数字依序为: 1 2 3 4 5
>> 输入的数字反序为: 5 4 3 2 1
>> 输入的数字总和为: 15
>> 输入的数字乘积为: 100
请高手帮帮忙 感恩~~
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 140.128.194.45
1F:→ MOONRAKER:都几岁了 勇敢一点 10/31 02:47
2F:推 chinoyan:这麽简单的功课自己写一下比较实在 10/31 06:56
3F:嘘 serhgrt:好好下功夫学吧,基础很重要的~问这些问题只会被炮轰=.= 10/31 07:57
4F:推 Marty:都期中考了...这好像是第一次交作业的题目...XD 10/31 12:14
5F:→ MOONRAKER:有用到阵列,应该是第三次以後了,所以叫他勇敢一点 10/31 14:13
6F:→ MOONRAKER:VB6上古化石不学也罢,当就当,没什麽好怕的。 10/31 14:14
7F:推 ClubT:Integer ? 不会溢位嘛? 10/31 17:36
8F:→ ClubT:而且1*2*3*4*5=120吧 = =" 10/31 17:38
9F:→ auxmathew:给他当吧.... 10/31 19:26