作者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