湖濱散記部落格的樹心幽徑[login][主頁]
551:20191223用記事本編寫可找前三名及飛機航班追蹤模擬的JavaScript程式

REF1: 20191221用記事本編寫JavaScripts網頁前端程式 »

 

REF2:20191216在jsbin.com網站編寫JavaScript程式將結果抓入writer再轉存為pdf再上傳至「金門農工學生學習歷程系統

(1-0)在A陣例找前三名JavaScript程式

(1-1)在notepad(記事本)輸入如下程式碼並存檔在桌面為c01.htm(存檔類型要選所有檔案)

<script>
var a =[63,54,23,78,99,10];
var rank=[];
a.push(65);a.push(78);
document.writeln("a[]="+a);
sort();
document.writeln("<hr>rank[]="+rank);

function sort(){
  rank.length=0;
  for (i=1;i<=3;i++){
    var aMax=Math.max(...a);
    document.writeln("<br>aMax="+aMax);
    var iaMax=a.indexOf(aMax);
    document.writeln("<br>iaMax="+iaMax);
    rank.push(a[iaMax]);
    a.splice(iaMax,1);
    document.writeln("<br>after splice a[]="+a);
    }
}

</script>

 

(1-2)用IE或chrome或firefox瀏覽器開啟c01.htm,瀏覽結果如下:

a[]=63,54,23,78,99,10,65,78
aMax=99
iaMax=4
after splice a[]=63,54,23,78,10,65,78
aMax=78
iaMax=3
after splice a[]=63,54,23,10,65,78
aMax=78
iaMax=5
after splice a[]=63,54,23,10,65


rank[]=99,78,78

 

(2-0)飛機航班追蹤模擬的JavaScript程式

(2-1) 在notepad(記事本)輸入如下程式碼並存檔在桌面為c02.htm(存檔類型要選所有檔案)

<script>

var start,end;

var b=[];

for (i=0;i<20000;i++) b.push(rand(30000));

start=new Date();
var result;
for (i=0;i<2500;i++) result=b.indexOf(747);

end=new Date();
document.write("747的索引="+result + " <br> b[result]="+b[result] + "<br>");

var dt=(end-start)/1000;
document.write("找2500次747花的時間=" + dt + "秒 <hr>");

function rand(r){
 var x=Math.random()*r;
 var y=parseInt(x);
 while (b.indexOf(y) >=0) {
    x=Math.random()*r;
    y=parseInt(x);
    }
 return y;
}

</script>

 

(2-2)用IE或chrome或firefox瀏覽器開啟c02.htm,瀏覽結果如下:

747的索引=2382
b[result]=747
找2500次747花的時間=0.007秒

(3)將以上c01.htm 及c02.htm 二檔的操作畫面及程式碼用fn+PrtScr鍵抓入LibreOffice 的writer中並存檔為「20191227電機一47號吳小花 js找前三名及飛機航班追蹤.odt」,並再 匯出為PDF檔(自動取用odt檔的主檔名),詳細內容格式請參如下二範例檔:(ALT鍵在空白鍵的二邊,PrtScr鍵在F12鍵的右邊)

20191227電機一47號吳小花 js找前三名及飛機航班追蹤.odt 下載 (361 KB)

20191227電機一47號吳小花 js找前三名及飛機航班追蹤.pdf下載 (299 KB) 

(4)請把(3)所產生的PDF檔上傳至「金門農工學生學習歷程系統」成為你的IT學習檔案。

 


select id,article_id,topic,text from lt_articles_text where article_id =551; ok. update lt_articles set num_reads=num_reads +1 where id=551; ok.