| 上一篇主題 :: 下一篇主題 |
| 發表人 |
內容 |
羽則
註冊時間: 2005-10-30
文章: 3
第 1 樓
|
 發表於: 星期日 十月 30, 2005 3:56 pm 文章主題: 【求助】新學VFP 各位VFP高手能不能幫我解答一道題目... |
 |
|
題目是這樣的
用鍵盤輸入行數
運行程序后顯示唯一個上三角和一個下三角
比如説 輸入5
得到
（其中中間那行在*前沒有空格 緊貼最左邊）
急，在綫等....請各位幫忙了....[/img][/i] |
|
| 回頂端 |
|
 |
syntech
註冊時間: 2003-05-16
文章: 4252
來自: Taipei,Taiwan
第 2 樓
|
| 發表於: 星期日 十月 30, 2005 4:33 pm 文章主題: |
|
|
看不到圖.....
_________________
如果公司有下列困擾:
1. 找不到便宜,快速,簡易的 生產排程軟體
2. 不知道如何快速排定 採購計劃
3. 成本抓不準,自己算比軟體算有用
4. 想學習系統規劃,想找系統架構的顧問
請聯絡我們,也許我們幫得上忙 |
|
| 回頂端 |
|
|
羽則
註冊時間: 2005-10-30
文章: 3
第 3 樓
|
| 發表於: 星期日 十月 30, 2005 4:48 pm 文章主題: |
|
|
*
***
*****
***
*
這樣的結果 |
|
| 回頂端 |
|
|
羽則
註冊時間: 2005-10-30
文章: 3
第 4 樓
|
| 發表於: 星期日 十月 30, 2005 4:51 pm 文章主題: |
|
|
暈 是這樣的
第一行是兩個空 然後一個*
第2行是一個空 然後三個*
第3行直接就是5個*
第4行和第2行一樣
第5行和第1行一樣
...
成一個菱形 |
|
| 回頂端 |
|
|
bin1x
註冊時間: 2004-08-27
文章: 462
第 5 樓
|
| 發表於: 星期日 十月 30, 2005 7:20 pm 文章主題: |
|
|
這是作業
而且是basic a 的作業,我是說以前啦
用vfp 來寫太浪費了啦,台語叫討債 |
|
| 回頂端 |
|
|
syntech
註冊時間: 2003-05-16
文章: 4252
來自: Taipei,Taiwan
第 6 樓
|
| 發表於: 星期日 十月 30, 2005 8:53 pm 文章主題: |
|
|
? '*'
? '***'
? '*****'
? '***'
? '*'
這是我對這種我瞧不起的人問我瞧不起的問題的標準回答
_________________
如果公司有下列困擾:
1. 找不到便宜,快速,簡易的 生產排程軟體
2. 不知道如何快速排定 採購計劃
3. 成本抓不準,自己算比軟體算有用
4. 想學習系統規劃,想找系統架構的顧問
請聯絡我們,也許我們幫得上忙 |
|
| 回頂端 |
|
|
小桑•無痕
註冊時間: 2003-07-08
文章: 304
來自: Tainan, Taiwan
第 7 樓
|
| 發表於: 星期日 十月 30, 2005 9:07 pm 文章主題: |
|
|
| syntech 寫到: | ? '*'
? '***'
? '*****'
? '***'
? '*'
這是我對這種我瞧不起的人問我瞧不起的問題的標準回答 |
呵呵....
我改一下...
? ' ＊'
? ' ＊＊＊'
? '＊＊＊＊＊'
? ' ＊＊＊'
? ' ＊'
思考方向：
行 空白 星號
１ ２個 １個
２ １個 ３個
３ ０個 ５個
４ １個 ３個
５ ２個 １個
EX1:
FOR I = -2 TO 2
? ABS(I)
NEXT I
RUN:
2
1
0
1
2
EX2:
? REPLICATE("*",5)
*****
? REPLICATE("*",4)
****
_________________
用力 Try 一下...可以發現很多好玩的事.... |
|
| 回頂端 |
|
|
小桑•無痕
註冊時間: 2003-07-08
文章: 304
來自: Tainan, Taiwan
第 8 樓
|
| 發表於: 星期日 十月 30, 2005 9:12 pm 文章主題: Re: 【求助】新學VFP 各位VFP高手能不能幫我解答一道題目... |
|
|
| 羽則 寫到: | 題目是這樣的
用鍵盤輸入行數
運行程序后顯示唯一個上三角和一個下三角
比如説 輸入5
得到
（其中中間那行在*前沒有空格 緊貼最左邊）
急，在綫等....請各位幫忙了....[/img][/i] |
思考方向(上三角形)：
行 空白 星號
１ ２個 １個
２ １個 ３個
３ ０個 ５個
空白公式 ＝ ３－第幾行
星號公式 ＝ （第幾行＊２）－１
思考方向(下三角形)：
唉。。都告訴你你會沒成長。。請自己想想吧。。。期望你POST上來。。。
_________________
用力 Try 一下...可以發現很多好玩的事.... |
|
| 回頂端 |
|
|
小賴
註冊時間: 2004-12-27
文章: 477
第 9 樓
|
| 發表於: 星期一 十月 31, 2005 8:28 am 文章主題: |
|
|
程式一開始可用INPUTBOX("請輸入菱形最大寬度", "使人瞧不起的問題....")
來取得輸入值. |
|
| 回頂端 |
|
|
impotence
註冊時間: 2005-02-21
文章: 135
來自: Hong Kong
第 10 樓
|
| 發表於: 星期一 十月 31, 2005 8:46 am 文章主題: |
|
|
暈 ~~ 因為我也是 VFP 的初學者 ...
n : the input value of number(s) of line and must be the odd number
.
.
.
For i = 1 to n
m = (n+1)/2
replicate(" ",ABS(i-m))
replicate("*",(i*2)-1)
endfor
.....
_________________
一個常常忘記 Command 的人 ! |
|
| 回頂端 |
|
|
|
常見問題
搜尋
會員列表
會員群組
會員註冊
個人資料
登入檢查您的私人訊息
登入
