实验2 数组、条件语句、循环语句及九九乘法表开发

实验2数组、条件语句、循环语句及九九乘法表开发一、实验目的掌握数组的使用方法，并能够灵活运用。掌握顺序语句和条件语句的语法结构、使用方法及注意事项。掌握循环语句的语法结构、使用方法及注意事项。二、实验内容【实验题1】编程求以下分段函数的值，上机调试运行程序。{X(x<l)2x-l(lWx<10)3x-ll(x^10)要求使用Edit组件输入x的值，按“计算”按钮，显示函数值。【实验题2】编程实现下述功能，并上机调试运行程序。给出百分制的成绩，要求输出其对应的成绩等级“A”，“B”，“C”，“D”，“E”。其中：90分(包括90分)以上为“A”，80〜89分为“B”，70〜79分为“C”，60〜69分为“D”，60分以下为“E”。【实验题3】输出100〜999之间的所有“水仙花数”。所谓“水仙花数”是指1个3位数，其各位数字立方和等于该数本身。例如153是1个“水仙花数”，因为153=13+53+33。【实验题4】利用循环语句编程实现九九乘法表。要求在一个Memo组件中显示，且各行各列严格对齐。三、实验仪器、设备1•计算机(Windows2000以上的操作系统，2.4GHz以上主频，512M以上内存)；2.Delphi7.0(或更高版本)软件集成开发环境。四、实验步骤【实验题1】选择主菜单的File—New—Application,新建1个应用程序。在窗体上放置2个Label组件，1个Edit组件和2个Button组件。窗体如图2.1所示。各组件的主要属性见表2-1。

组件名A 性组件名A 性属性值Forni1Caption选择结构程序设计1Label!Caption请谕人X的值Label2Captionf空》EditlTextf空》Button1Caption计算Button2Caption关闭表2-1各组件的主要属性图2.1窗体设计双击“计算”按钮，在TForm1.Button1Click事件处理器的编辑区中输入下列代码：varx,y:integer;result:string;beginx:=strtoint(edit1.text);ifx<1theny:=xelseifx<10theny:=2*x-1elsey:=3*x-11;str(y,result);//相当于result:=inttostr(y)；label2.caption:二'函数值为：'+result;end;双击“关闭”按钮，在TForm1.Button2Click事件处理器的编辑区中输入下列一行代码：close;保存文件，按F9键运行程序。在Edit1中输入数值，按“计算”按钮，观看运行结果。如图2.2和图2.3所示是分别输入7和14时的运行结果。

【实验题2】选择主菜单的File—New—Application,新建1个应用程序。在窗体上放置2个Label组件，1个Edit组件和2个Button组件。窗体设计如图2.4所示。各组件的主要属性见表2-2。图2.4窗体设计组件名图2.4窗体设计组件名厲 性属性值Form1CaptionCase结构程序设计Label1Caption请输入成绩Label2Caption<JT：)Edit!Tex.tButton1CaptionButton2Caption关闭表-2-2各组件的主要属性双击“等级”按钮，在TForm1.Button1Click事件处理器的编辑区中输入下列代码：varscore:0..100;grade:string;beginscore:=strtoint(edit1.text);casescoreof100:grade:='A';89:grade:='B';79:grade:='C';69:grade:='D';elsegrade:='E';end;label2.caption:='该成绩的等级是：'+grade;end;双击“关闭”按钮，在TForm1.Button2Click事件处理器的编辑区中输入代码“close”；保存文件，按F9键运行程序。在Edit1中输入成绩，按“等级”按钮，观看运行结果。图2.5和图2.6是分别输入56和87时的运行结果。

图2.5运行结果一图2.6运行结果二【实验题3】选择主菜单的File—New—Application,新建1个应用程序。在窗体上放置1个Label组件，1个Memo组件和2个Button组件。窗体设计如图2.9所示,各组件的主要属性见表2-4。表2-4各组件的主要属性表2-4各组件的主要属性組件名M性厲性值Form1Caption循环程序设计2Label1Caption100-999之间的水仙花数Button1Caprion谕出Button2Caption关闭图2.9窗体设计双击“输出”按钮，在TForm1.Button1Click事件处理器的编辑区中输入下列代码：vari,j,k,n:integer;result:string;begin图2.10运行结果forn:=100to999dobegin图2.10运行结果i:=ndiv100;j:=ndiv10-i*10;k:=nmod10;ifn=i*i*i+j*j*j+k*k*kthenbeginstr(n,result);Memo1.Lines.add(result);end;end;end;双击“关闭”按钮，在TForm1.Button2Click事件处理器的编辑区中输入代码“close”；⑸保存文件，按F9键运行程序。单击“输出”按钮，观看运行结果，如图2.10所示。【实验题4】选择主菜单的File—New—Application,新建1个应用程序。在窗体上放置1个Label组件，1个Memo组件和2个Button组件。窗体设计如图2.11所示，各组件的主要属性见表2-5。组件名属性属性值FormlCaption九九乘法表ButtonlCaption打印九九乘法表Button2Caption退出程序:打印九九乘法衣|二二 退出程序一表2-5各组件的主要属性双击“打印九九乘法表”按钮，在TForm1.Button1Click事件处理器的编辑区中输入下列代码：var图2.11窗体设计i,j:integer;str1:string;beginmemo1.Clear;memo1.Lines.Add('九九乘法表');memo1.Lines.Add('');str1:='';fori:=1to9dobeginforj:=1toidobeginif(j=3)and((i=3)or(i=4))thenstr1:=str1+''+inttostr(j)+'*'+inttostr(i)+'='+inttostr(i*j)+''elsestr1:=str1+inttostr(i)+'*'+inttostr(j)+'='+inttostr(i*j)+'';//表达式输出end;memo1.Lines.Add(str1);//输出显示str1:='';end;双击“退出程序”按钮，在TForm1.Button2Click事件处理器的编辑区中输入代码“close”保存文件，按F9键运行程序。单击“打印九九乘法表”按钮，观看运行结果，如图2.12所示。五、实验的注意事项在事件代码中使用条件语句时，应该注意代码的层次。为了保护程序的完整性，每个实验题目应建立一个独立的文件夹注意代码中的组件名称要和窗口设计中的组件名称一致。六、实验报告要求书写实验报告时，应写明所用的设备、软件及其版本、机器编号。实验内容部分要详细写出实验项目所要求的具体内容和实验所要完成的主要功能。2.在实验步骤中要求写出详细的参数设置和实验结果。实验总结中应写出在程序设计或调试过程中出现的主要问题及解决方法或思路。七、思考题比较if…then语句、if…then„else语句、if„then„else复合语句和if„then„else语句的嵌套语句的用法，试将【实验题1】中“计算”按钮中的程序改