聊天 - 還記得這個BASIC程式嗎?

[魔術王子]

作者: mini

日前google貼了個
兒童程式語言周年 的遊戲連結
玩了一下
其實還真不簡單 (邏輯比兒童不如~! )

程式語言
到了應用效能模式就會變得搞怪
為了達到目的不擇手段

PHP 語法:

j=-1
for i=1 to 高
  print space(高-i) + Format(j+2, "*")
  j=j+2
next 


所以如有機會去看那些高手應用
就不要抱著每行都要看懂的思維
寫得好的會在效能與維護間包裝得宜
寫的怪的
則是有看沒有懂
甚至自己過段時間去看(沒有註解)都會看不懂

這邏輯真的很棒耶
等一下再來試試看

另外今天一直在思索另一個程式

PHP 語法:

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

10 CLS
20 N=5
30 FOR I=1 TO 10 STEP 2
40 PRINT SPACE(N);
50 FOR J=1 TO I
60 PRINT "*";
70 NEXT J
80 PRINT
90 N=N-1
100 NEXT I
110 N=1
120 FOR I=9 TO 1 STEP -2
130 PRINT SPACE(N);
150 FOR J=1 TO I
160 PRINT "*";
170 NEXT J
180 PRINT
190 N=N+1
200 NEXT I 


寫完之後,覺得有點遜,因為迴圈分開兩次運算
這可以用三重回圈來設計,所以又想到下面的程式碼

PHP 語法:

10 CLS
20 A=1:B=10:C=2:N=5
25 FOR K=1 TO 2
30 FOR I=A TO B STEP C
40 PRINT SPACE(N);
50 FOR J=1 TO I
60 PRINT "*";
70 NEXT J
80 PRINT
90 IF K=1 N=N-1 ELSE N=N+1
100 NEXT I
110 A=9:B=1:N=1:C=-2
120 NEXT K 


其實是可以透過運算來改變數值,但這個程式在運算很差(我的數學很爛)
不但沒有先乘除後加減的概念,而且只能單次運算,也就是只能1+1,而不能1+2+6+5...