史萊姆論壇 - 查看單個文章

魔術王子 · 2018-10-04, 06:34 AM

想不到真的可以...

10 CLS
15 DIM N(3)
20 INPUT "輸入數字: ",N(1)
21 INPUT "輸入數字: ",N(2)
22 INPUT "輸入數字: ",N(3)
23 FOR K=1 TO 3
30 FOR I=1 TO N(K)
40 FOR J=1 TO I
50 PRINT "*";
60 NEXT J
70 PRINT
80 NEXT I
85 PRINT
90 NEXT K

輸入數字: 5
輸入數字: 10
輸入數字: 15
*
**
***
****
*****

*
**
***
****
*****
******
*******
********
*********
**********

*
**
***
****
*****
******
*******
********
*********
**********
***********
************
*************
**************
***************

2018-10-04, 06:34 AM	#2 (permalink)
魔術王子版區管理員榮譽勳章勳章總數11 UID - 115097 在線等級: 註冊日期: 2004-01-13 住址: 魔術學園文章: 3067 精華: 0 現金: 15301 金幣資產: 2678931 金幣	想不到真的可以... 10 CLS 15 DIM N(3) 20 INPUT "輸入數字: ",N(1) 21 INPUT "輸入數字: ",N(2) 22 INPUT "輸入數字: ",N(3) 23 FOR K=1 TO 3 30 FOR I=1 TO N(K) 40 FOR J=1 TO I 50 PRINT ""; 60 NEXT J 70 PRINT 80 NEXT I 85 PRINT 90 NEXT K 輸入數字: 5 輸入數字: 10 輸入數字: 15 * ** *** * * ** * ** *** **** ***** ******** * * ** * ** *** **** ***** ****** ******* ******** ********* ********** *************
	__________________ 『唸金母心咒：嗡。金母。悉地。吽。』持此咒者，可免一切瘟疫，一切瘟神抱頭四散。魔術就是欣賞神奇的效果如果魔術的秘密被破解了那魔術就失去欣賞的價值
	送花文章: 1542, 收花文章: 1574 篇, 收花: 3929 次