Read与Readln程序举例-Delphi程序设计教程—数据类型、运算符、表达式
Read与Readln程序举例t已知矩形的两条边长分别是a和b，求矩形的面积。源程序： program Project1; {$APPTYPE CONSOLE} uses SysUtils; var a,b:Real;//长方形的长与宽变量定义area:Real;//面积变量定义begin try { TODO -oUser -cConsole Main : Insert code here } writeln('请输入长方形的长与宽：');//输入提示信息readln(a,b); //通过输入语句读入长与宽数据值area:=a*b; //根据公式计算面积writeln('面积为：',area);//输出面积数值readln; //输入语句，为了让程序暂停一下except on E:Exception do Writeln(E.Classname, ': ', E.Message); end.
文件大小：1.03MB
评论区