1、pascal 语法2005 年 1 月 27 日 09:45 作者：不详 来源：中国烟机备件网第一章、pascal 介绍一、pascal 的基本语法单位1、基本符号AZ；az；09；+，-，*，/，=，max THEN max:=aELSEIF a DO例 1：输入一串字符串，求第一个“，”前的大小写字母个数和其它字符个数。program string(input,output);varch:char;c,s,o:integer;beginwrite();read(ch);c:=0;s:=0;o:=0;while ch=A)and(ch=a)and(chUNTIL例：以字符(char)的形式读
2、入一实数，以实形(real)输出该数。第五章、函数与过程程序设计一、函数（包括标准函数和自定义函数）1、函数的定义格式：FUNCTION 函数名（）：返回值类型；VARBEGINEND注：1、形参表每个参数都写明其类型；2、有且只有一个返回值，并且要将返回值赋值给函数名。例：求五边形的面积function area(a,b,c:real):real;varp:real;beginp:=(a+b+c)/2;area:=sqrt(p*(p-a)*(p-b)*(p-c);end;2、函数的调用1）、函数的调用必然出现在表达式中（等号的右边），不能以单独地在语句出现2）、调用时，将每个实参传递给对应的形参program ml_area(input,output);varl1,l2,l3,l4,l5,l6,l7,s:real;function area(a,b,c:real):real; varp:real;beginp:=(a+b+c)/2;area:=sqrt(p*(p-a)*(p-b)*(p-c);end;beginwrite(input);readln(l1,l2,l3,l4,l5,l6,l7);s:=area(l1,l2,l6)+area(l2,l6,l7)+;writeln(s=,s:10:3);end.二、过程格式：PROCEDURE()
