程序實驗報告6

第6章VisualFoxPro程序設計基礎實驗報告學生姓名FORMTEXT李小平學號FORMTEXT0090526教學班FORMTEXTA40FORMTEXT密381實驗項目FORMTEXT程序設計基礎與應用實驗地點G303實驗課日期與節(jié)次FORMTEXT2010年11月15日FORMCHECKBOX必修FORMCHECKBOX選修指導教師賴新峰批閱教師電子稿記錄FORMTEXT遲交(抄習)報告電子稿在此錄[遲][抄]指導教師評語及成績：FORMTEXT紅筆批閱：成績：FORMTEXTFORMTEXT教師簽名：日期：FORMTEXT打印稿記錄FORMTEXT等級遲交：抄習：一、實驗綜述㈠實驗目的及要求掌握算法的基本思想和結構程序設計的基本方法。掌握VisualFoxpro程序設計語言的特點和基本輸入、輸出命令。熟悉程序文件的創(chuàng)建、運行和調試過程。掌握順序結構程序設計的思想和方法。掌握選擇結構程序設計的思想和方法，進一步了解邏輯表達式和算數(shù)表達式應用技巧。掌握單重循環(huán)程序的編寫。掌握多重循環(huán)程序的編寫。㈡實驗儀器、設備或軟件VisualFoxpro6.0關系數(shù)據(jù)庫軟件。網(wǎng)絡環(huán)境。㈢實驗任務任務1：關于數(shù)據(jù)庫的編程設有數(shù)據(jù)庫studentdb.dbc，數(shù)據(jù)庫包含表class、表student、表achievement和表course，各個數(shù)據(jù)表的字段類型請自行查閱。查詢前必須按下列要求增加記錄：①現(xiàn)有的class表中增加一個班級，班級號為EFC0802，班級名“金融管理08-02班”。②在student表中至少增加3條相關實驗者的真實身份的記錄。以實驗者真實身份學號：FORMTEXT，姓名：FORMTEXT，班級號EFC0802（新增的班級號）等相應信息添加student表中；再添加2條記錄：1條是與你的姓相同且班級號、籍貫與實驗者相同的記錄；另1條是名中有一個字與你的名相同且班級號、籍貫與劉翔相同的記錄的記錄。新增的3條記錄并性別、出生日期、入學成績等數(shù)據(jù)在合理的范圍中。③對每個新增學生記錄至少在achievement表中增加2個成績（注意合理增加課程號）。編程實現(xiàn)：編程統(tǒng)計并輸出班級號為"EFC0801"的男生人數(shù)和女生人數(shù)（杜絕使用SQL查詢語句和統(tǒng)計命令。任務2：關于分支結構的編程分別用IF-ELSE-ENDIF和DOCASE/ENDCASE分支結構方法求下列函數(shù)f(x)的值（其中實驗者真實身份的學號FORMTEXT0090526，后2位非0的數(shù)字為FORMTEXT26。要求實驗時x的值臨時從鍵盤上分別輸入:正FORMTEXT26和負FORMTEXT26及-0.FORMTEXT26進行調試，給出其相應的結果）任務3：關于循環(huán)結構的編程(學號尾數(shù)為奇數(shù)做第一、三題；學號尾數(shù)為偶數(shù)做第二、四題；第五題為必做題)要求每題有一個循環(huán)控制變量須用實驗者的姓氏拼寫，例如:陳姓用chen（1）從鍵盤上輸入10個數(shù)據(jù)，然后按相反的順序不換行輸出；在程序中找出最大和最小者，計算這10個數(shù)的平均值。（在表達運行結果時關于輸入可在一行中指出輸入數(shù)據(jù)的順序，若實驗者真實身份的學號FORMTEXT0806798，后2位非0的數(shù)字為FORMTEXT98，則要求第10個數(shù)據(jù)輸入FORMTEXT98，然后正確給出答案）（2）實驗者真實身份的學號FORMTEXT0806798，后3位非0的數(shù)字為FORMTEXT798，編程計算FORMTEXT798至1000整數(shù)之間的全部素數(shù)。（要求每行僅輸出8個結果）（3）實驗者真實身份的學號FORMTEXT0806798，后3位非0的數(shù)字為FORMTEXT798，編程求數(shù)列1,1/2,2/3,3/5,5/8,8/13,……前FORMTEXT798項之和?（4）編程計算S=1+(1+2)+(1+2+3)+…+(1+2+3+4+…+FORMTEXT98）其中FORMTEXT98是實驗者真實身份的學號FORMTEXT0806798的后2位非0的數(shù)字。（5）用循環(huán)控制結構及格式化輸出和非格式化輸出2種方法分別編程實現(xiàn)圖6-3的幾何圖形。（本題在報告中僅給出程序即可）圖6-3幾何圖形（倒直角三角形）二、實驗過程（試驗步驟、源程序代碼）FORMTEXT編程前按照要求填寫學生姓名，學號，教學班，實驗地點等相關內容。認真閱讀實驗目的及要求和按照任務一填寫相關的記錄看了下題目類型然后再課本上找相關的例題源程序FORMTEXT任務一clearsetdefatoc:\myworkusestudents1=0s2=0dowhile.not.eof()ifclassno="EFC0801"ifsex='男's1=s1+1elses2=s2+1endifelseendifskipenddo?'班級號為EFC0801的男生總數(shù):',s1?'班級號為EFC0801的女生總數(shù):',s2任務二clearinput"請輸入x的值："toxifx<=-1f=1/(3-x)elseifx>=1f=1/exp(x)elsef=1/(2+x^2)endifendif?fclearinput"請輸入x的值："toxdocasecasex<=-1f=1/(3-x)casex>=1f=1/exp(x)case-1<x<1f=1/(2+x^2)endcase?f第二題clear@2,10say"所有的素數(shù)有："input"請輸入n的值："tonm=1f=0fori=nto1000a=int(sqrt(i))k=2dowhilek<=aifmod(i,k)=0exitendifk=k+1enddoifk>a@4+f,4*msaystr(i,4)m=m+1ifm=9m=1f=f+1@4+f,4*msaystr(i,4)endifendifendfor第二題clear@2,10say"所有的素數(shù)有："input"請輸入n的值："ton?m=0&&每行的個數(shù)fori=nto1000a=int(sqrt(i))k=2dowhilek<=aifmod(i,k)=0exitendifk=k+1enddoifk>am=m+1??str(i,4)ifm=8m=0?endifendifendfor4.clearinput"請輸入一個n的值："tons=0fori=1tons=s+(1+i)*i/2next?str(n,2)+"計算值="+str(s,6)5.1.clearfori=1to7forj=1to8-i@i,i+j-1saystr(8-i,1)endforendfor5.2.cleari=1dowhilei<=7?space(i-1)forj=1to8-i??str(8-i,1)nexti=i+1enddo三、實驗主要結果與程序調試過程的說明1.實驗結果FORMTEXT任務一班級號為EFC0801的男生總數(shù)：2班級號為EFC0801的女生總數(shù)：0任務二請輸入x的值：-260.0345請輸入x的值：260.0000請輸入x的值：-0.260.4837請輸入x的值：-260.0345請輸入x的值：260.0000請輸入x的值：-0.260.4837第二題所有的素數(shù)有請輸入n的值:526541547557563569571577587593599601607613617619631641643647653659661673677683691701709719727733739743751757761769773787797809811821823827829839853857859863877881883887907911919929937941947953967971977983991997第四題請輸入一個n的值：2626的計算值=3276第五題777777766666655555444433322177777776666665555544