【正文】
d(k)end。 mistake,please again39。readln。)。while k5 dobeginwriteln(39。ave(stu)。end。writeln。39。)。write(39。writeln。 39。)。for i:=1 to n do write(s[i]:7:1,39。 39。 39。 39。 39。39。writeln。39。)。write(39。 39。ave39。)。:8,39。,39。:9,39。,39。:6,39。,39。:5,39。,39。:8,39。,39。:9,39。,39。:4,39。,39。write(39。)。for i:=1 to 72 do write(39。 39。writeln。table39。var j,i:integer。end。no pass num is :39。 39。,q1)。:5,39。writeln(39。end。end。eng:39。if h3 thenbeginbeginfor j:=1 to m dowith stu[j] doif stu[j].eng=60 thenq1:=q1+1elseq2:=q2+1。)。writeln(39。end。math:39。if h1 thenbeginbeginfor j:=1 to m dowith stu[j] doif stu[j].math=60 thenq1:=q1+1elseq2:=q2+1。3:h3:=true。case w1 of1:h1:=true。)。:30,39。writeln(39。q1:=0。h2:=false。h1,h2,h3:boolean。procedure tj(var stu:sarr)。ave:=0end。f39。age:=0。name:=39。)。 then begin write(39。if b=39。)。write(39。b:char。procedure del(var stu:sarr)。end。d:=iend。for i:=1 to m dobeginif stu[i].num=n then beginct[1]:=stu[i]。)。while u dobeginwrite(39。u:boolean。procedure find(var stu:sarr)。writeln。39。)。write(39。writeln。 39。)。for i:=1 to n do write(s[i]:7,39。 39。 39。 39。 39。39。writeln。39。)。write(39。 39。ave39。)。:8,39。,39。:9,39。,39。:6,39。,39。:5,39。,39。:8,39。,39。:9,39。,39。:4,39。,39。write(39。)。for i:=1 to 72 do write(39。 39。var i:integer。end。stu[j]:=tm[1]。tm[1]:=stu[p]。beginfor j:=1 to m dobeginp:=j。var tm:ta。end。ave:=k/nend。beginfor j:=1 to m dobegink:=0。var j,i:integer。end。writeln。stu[j]:=a。end。end。)。write(39。readln(s[i])。eng:39。end。readln(s[i])。phy:39。while(s[i]100)dobeginwriteln(wrong)。)。2:begin write(39。end。)。write(39。readln(s[i])。math:39。readln(sex)end。sex:39。f39。m39。const wrong=39。k,d:integer。varstu:sarr。ta=array [1..m] of student。end。math,eng,phy:real。sex:char。name:string[3]。n=3??偟膩碚f兩題程序比較困難六. twins。2.第二題較第一題簡單,和書上的例題類似,所以,比較簡單,但從中也出現(xiàn)一些不問題。五. 實(shí)習(xí)小結(jié)1.第一題的程序編寫比較復(fù)雜,需要較多的定義,因而在后面的程序部分,就常出現(xiàn)標(biāo)識(shí)符重復(fù),而導(dǎo)致的類型不匹配。還有就是type mismatch’的類型不匹配,只要根據(jù)前后內(nèi)容,重新定義,就可以了。三. the 1 student :num:03name:wfage:18sex:fmath:98phy:75eng:65Input the 2 student :num:06name:scage:17sex:fmath:78phy:45eng:65Input the 3 student :num:09name:ytage:17sex:mmath:69phy:75eng: name age sex math phy eng ave3 wf 18 f yt 17 m sc 17 f number:3num name age sex math phy eng ave3 wf 18 f number:6num name age sex math phy eng ave6 sc 17 f ? Y/Ny1tablenum name age sex math phy eng ave3 wf 18 f yt 17 m 0 0 f the math the phy the eng 1math: pass num is :3 no pass num is :+82=114right!97*15=1455right!9958=41right!7666=10right!58+13=71right!37+49=86right!99+52=151right!49*69=5462wrong!7338=31wrong!86+34=120right!mark is 80四. 和end 不配對(duì),只要始它們的個(gè)數(shù)相同就可以了,就可以了。4.。正確時(shí),顯示’right’。每完成一個(gè)算題就給出是否正確的信息。根據(jù)b的值選擇不同的運(yùn)算。7.刪除學(xué)生,選中刪除的學(xué)生,如果確定要,那么該學(xué)生的一切記錄就變?yōu)?;2.1.隨機(jī)調(diào)用函數(shù),產(chǎn)生兩個(gè)其值為10到99的隨機(jī)整數(shù)分別放在c,d中用作運(yùn)算時(shí)的運(yùn)算數(shù)。3.打印表頭;4.在求出平均分,并打印出平均分。二. .先定義所需要的條件,例如,姓名,學(xué)號(hào),性別,三門功課的成績,平均分等。第二篇:上機(jī)實(shí)驗(yàn)報(bào)告格式請各位同學(xué)按照下列格式寫:否則按照0分記上機(jī)實(shí)驗(yàn)報(bào)告格式Matlab學(xué)習(xí)第?次上機(jī)實(shí)驗(yàn)報(bào)告(第?次)姓名:???班級(jí):???上機(jī)時(shí)間:??????將文檔發(fā)到我的郵箱里面learn_matlab第三篇:上機(jī)實(shí)驗(yàn)報(bào)告一. 題目1. 建立一個(gè)學(xué)生檔案,內(nèi)容包括學(xué)號(hào),姓名,年齡,性別,數(shù)學(xué),物理和英語3門功課成績。通過幾次的編程,熟悉了java的編程規(guī)則。通過這個(gè)實(shí)驗(yàn)鞏固了java的基礎(chǔ)知識(shí):類和接口的有關(guān)知識(shí),繼承的應(yīng)用。三、實(shí)驗(yàn)器材計(jì)算機(jī)+windows操作系統(tǒng)+eclipse四、實(shí)驗(yàn)步驟(壓縮在文件夾里) 五、實(shí)驗(yàn)結(jié)果::如圖所示:程序分別輸出了Todo、Note、Appointment、Contact、以及匹配指定日期的結(jié)合的結(jié)果。返回集合PIMCollection中所有與d匹配的PIMEntities,如果沒有匹配d的項(xiàng),則返回一個(gè)空集合(只有PIMTodo和PIMAppointment項(xiàng),因?yàn)镻IMNote和PIMContact跟日期沒有關(guān)系)。則返回一個(gè)空集合(4).getContacts()。返回集合PIMCollection中所有的PIMTodo項(xiàng),如果不包含PIMTodo項(xiàng),則返回一個(gè)空集合(3).getAppointment()。第一篇:Java上機(jī)實(shí)驗(yàn)報(bào)告Homework3實(shí)驗(yàn)報(bào)告一、實(shí)驗(yàn)?zāi)康呐c要求掌握J(rèn)ava中類和接口的基本知識(shí);繼承的基本知識(shí);集合的基本操作二、實(shí)驗(yàn)內(nèi)容 類創(chuàng)建一個(gè)可以管理PIMEntities實(shí)體的集合,該類實(shí)現(xiàn)了Collection接口,且必須實(shí)現(xiàn)了以下方法:(1).getNotes()。返回PIMCollection中所有的PIMNote項(xiàng),如果不包含PIMNote項(xiàng),則返回一個(gè)空集合(2).getTodos()。返回集合PIMCollection中所有的PIMAppointment項(xiàng),如果不包含PIMAppointment項(xiàng)。返回結(jié)合PIMCollection中所有的PIMContact項(xiàng),如果不包含PIMContact項(xiàng),則返回一個(gè)空集合(5).getItemsForDate(Date d)。(自己的測試類)向PIMCollection集合類中加入了一些PIMEntity實(shí)體類,并用PIMCollection類中實(shí)現(xiàn)的方法分別篩選出了其中的PIMNote、PIMTodo、PIMAppointment、PIMContact、符合指定日期d的集合并打印輸出。六、實(shí)驗(yàn)小結(jié)熟悉了Java集合的基本內(nèi)容和操作,也包括了泛型的一些知識(shí)。掌握了在eclipse下編譯執(zhí)行Java程序的知識(shí)。綜合應(yīng)用所學(xué)知識(shí)完成java程序的分析、設(shè)計(jì)、調(diào)試和總結(jié),為以后編寫更復(fù)雜的java程序打下了很好的基礎(chǔ)。要求實(shí)現(xiàn)以下功能:1)數(shù)據(jù)輸入;2)查詢某個(gè)學(xué)生的成績;3)按平均排列輸出;4)統(tǒng)計(jì)某門課各分?jǐn)?shù)段人數(shù);5)刪除某個(gè)學(xué)生記錄;2. 編程實(shí)現(xiàn)對(duì)二位數(shù)進(jìn)行加,減,乘運(yùn)算,每運(yùn)行一次程序做10道題,完成后給出成績(每題10分)。2.輸入姓名,學(xué)號(hào),性別,年齡,三門功課的成績后,就輸出相應(yīng)的姓名,學(xué)號(hào),性別,年齡,三門功課的成績。5.在查找學(xué)生,并打印出學(xué)生的相關(guān)資料;并按照平均分的高低排列;6.在統(tǒng)計(jì)學(xué)生各科成績是否》=60分,如果是就是通過,否就是沒通過,最后打印出最后的結(jié)果。2.隨機(jī)調(diào)用函數(shù),產(chǎn)生一個(gè)值為1到3 的隨機(jī)整數(shù)放入b中,用來選擇不同的運(yùn)算。當(dāng)b=1時(shí),去進(jìn)行c+d的運(yùn)算練習(xí);當(dāng)b=2 時(shí),去進(jìn)行cd的運(yùn)算練習(xí);當(dāng)b=3時(shí),去進(jìn)行cd的運(yùn)算練習(xí)。3.根據(jù)答案正確與否統(tǒng)計(jì)。錯(cuò)誤時(shí),顯示’wrong’。5.輸出學(xué)生成績。在程序中常出現(xiàn)的’unknown identifier’沒有定義的錯(cuò)誤,只要在程序前加上定義,就可以了。題目要求是兩個(gè)兩位數(shù)運(yùn)算,如果寫成c:=random(100)在運(yùn)行過程中,就會(huì)出現(xiàn)一位數(shù)運(yùn)算,只要把它寫成c:=random(90)+10,就可以了。還有就是每個(gè)部分編好后,上下不能連接,而無法調(diào)用。以上兩大題中出現(xiàn)的問題,要在同學(xué)的幫助下,才能完成。const m=3。typestudent=recordnum:integer。age:integer。s:array[1..n] of real。ave:real。sarr=array[1..m] of student。f=string[6]。ct:ta。procedure readin(var stu:sarr)。039。)and(sex39。)dobeginwrite(39。)。for i:=1 to n do begincase i of1:begin write(39。)。while(s[i]100)dobeginwriteln(wrong)。math:39。readln(s[i])。end。phy:39。readln(s[i])。write(39。)。end。3:begin write(39。)。while(s[i]100)dobeginwriteln(wrong)。eng:39。readln(s[i])。end。end。end。end。procedure ave(var stu:sarr)。k:real。with stu[j] dobeginfor i:=1 to n do k:=k+s[i]。end。procedure px(var stu:sarr)。j,i,p:integer。for i:=j+1 to m doif stu[i].avestu[p].ave then p:=i。stu[p]:=stu[j]。end。procedure head(ct:ta)。beginwrite(39。)。39。writeln。39。 num39。 39。name39。 39。age39。 39。sex39。 39。math39。 39。phy39。 39。eng39。 39。writeln(39。:6,39。)。 39。for i:=1 to 72 do write(39。)。with ct[1] dobeginwrite(39。,num:7,39。,name:8,39。,age:8,39。,sex:5,39。)。 39。write(ave:10,39。)。end。 39。for i:=1 to 72 do write(39。)。end。var n,i:integer。beginu:=true。Into number:39。readln(n)。u:=false。end。end。var i:integer。beginhead(ct)。true? Y/N39。readln(b)。y39。139。with stu[d] dobeginnum:=0。039。sex:=39。for i:=1 to n do s[i]:=0。endelseend。var w1,q1,q2,num,j:integer。beginh1:=false。h3:=false。q2:=0。 39。 the math the phy the eng 39。readln(w1)。2:h2:=true。end。writeln(39。)。if h2 thenbeginbeginfor j:=1 to m dowith stu[j] doif stu[j].phy=60 thenq1:=q1+1elseq2:=q2+1。phy:39。end。writeln(39。)。end。end。 39。pass num is :39。writeln(39。:5,39。,q2)。proce