pascal语法基础

循环语句

for循环

for i:=0 to|downto n do
	begin
		循环体;
	end;

while循环

while <bool条件> do
	begin
		循环体;
	end;

数组

一维数组的定义

var a:array[1..100] of integer;//定义一个大小为100的整形的数组a,首位置是a[1]

二维数组的定义

var a:array[1..10,1..10] of integer;

字符串

获取字符串的长度

length(str)

参数传递

地址传递
在变量前面加上var

procedure fun(var sum: double);

函数

返回一个数组

type
	intarray=array[1..100] of integer;
function fun():intarray;

定义结构体

type
  studentrecord = record      //定义结构体
    id,name,gender:string;
    english,math,wl:double;
  end;
var
	t:studentrecord; //t为结构体变量