pascal简单语句

1、ascal简单语句1赋值语句赋值语句是为变量提供数据的语句，它具有计算和赋值的双重功能格式：变量标识符：= 表达式如：a:=1；他的意思是将常数1赋值给变量aa:=b；他的意义是将变量b的值赋值给变量a2思考：b:=a与a:=b含义一样吗？b:=a是对变量b进行赋值，a的值不会变化a:=b是对变量a进行赋值，b的值不会变化i:=i+1；是将i的原值加1；如果i原值为6，那i+1等于7，i当前的值就为73输出结果是多少program e1_1(input,output);const a=8;var b,c:integer;d:real;beginb:=a mod 3;c:=a*b;d:=a;wr

2、iteln(b,c,d);end.b : 2 c:16 d:8.0 4输出结果是多少program e1_2(input,output);var a,b,c:integer;begina:=1;b:=2c:=3c:=c*aa:=4;b:=a;c:=c*a;writeln(a,b,c,d);end.a:4 b:4 c:125输入语句、Free Pascal语言的输入语句有如下两种形式：）read()；）readln()； 、使用说明）是一个或几个由逗号隔开的变量标识符，他们必须在程序说明部分预先说明，他们可以是整型、实型或字符型，布尔型不可以直接读入。例：a，b，c为整型变量，read(a,b,

3、c)之后键盘输入：20 30 40 (表示回车)结果：a=20，b=30，c=40）readln语句和read语句不同之处在于输入数据到各变量之后，readln自动换行，从下一行开始再输入数据。一个read语句执行完后，数据行中多余的未读数据可以被下一个输入语句读入；而一个readln于执行完后，数据行中多余未读数据就没有用了。readln语句中可以不包含变量名表。即有以下等价情况： read(a,b);readln等价于readln(a,b) 6输入语句 ）输入语句输入的数据类型必须和变量一一对应。如果输入的是一串整数或实数，数据间用空格或回车分隔；若输入的是一串字符，则不用分隔。一次性读入

4、的数据类型必须要求一致.例：program shuru;varx:real;c:char;beginwrite(please input the number: ($XXX.XX);readln(c,x);/错误readln(c);/字符与实数分开来读入readln(x);writeln(The price is ,c,x)end. 7输入自己名字表扬自己写一个输入语句，然后输入自己名字如 输入杨慧姗 readln（a） 注意a是字符串类型string输出 杨慧姗是天才 writeln(a, is a talented) 注意pascal中的（）看起来像，但是他们不能用来表示的，要用9、0的括

5、号！8输出语句 、Free Pascal的输出语句有两种形式：）write()）writeln()、使用说明）是一串用逗号分隔的常量、变量、函数名、表达式或字符串。如果是变量、函数名、表达式，则将其计算结果输出；如果是常量或字符串，则直接输出其值。）writeln和writeln的区别在于：write语句是输出项输出后，不换行，光标停留在最后一项后，writeln语句按项输出后，自动换行，光标则停留在下一行的开始位置。writeln语句允许不含有输出项，即仅writeln;表示换行。9输出语句 ）Free Pascal语言把输出项的数据显示占用的宽度称为域宽，你可以根据输出格式的要求在输出语句

6、中自动定义每个输出项的宽度。定义宽度时分为单域宽和双域宽。、单域宽输出格式为writeln(I：n)在n个字符宽的输出域上按右对齐方式输出I的值，若n大于I的实际位数，则在I值前面补(n-I的实际位数）个空格。若I的实际位数大于n，则自动突破限制。n必须是整数。、双域宽输出格式为writeln(a：m：n)双域宽主要用于实型数据的输出。n的用法同上。在n个字符宽的输出域上按右队齐方式用小数点形式输出a的数值，m是小数点后的位数。原来的数据按该该格式指定的小数位数四舍五入。若m=0 ，则不输出小数部分和小数点，原数据四舍五入取整。n，m必须是整数。 10输出语句 program shuchu;consts=pascal;vari:integer;r:real;c:char;b:boolean;begini:=12345;r:=123.45c:=a;b:=true;writeln(i=);writeln(i:6);writeln(r=,r,r:6:1);writeln(c=,c,c:10);writeln(b=,b,b:10)end. 11编程交换两个数的值本来小明是男生，小红是女生，但是老师在录入档案的时候将他们的性别弄错了，现在要将他们改正过来，你们能帮忙吗？如 a=1，b=2，现在要将a=2，b=1，要怎样呢t:=a；a:=b；b:=t；在pascal