📜  帕斯卡备忘单 - 帕斯卡(1)

📅  最后修改于: 2023-12-03 14:54:01.671000             🧑  作者: Mango

帕斯卡备忘单 - Pascal

简介

帕斯卡(Pascal)是一种高级的过程式编程语言,于1970年由Niklaus Wirth设计出来。它以程序清晰、结构化概念严谨、语法简明为特点,主要用于教育和科研领域。

基本语法
变量声明
var
   变量名: 变量类型;
常量声明
const
   常量名 = 常量值;
过程声明
procedure 过程名(参数列表);
var
    变量名: 变量类型;
begin
    // 过程体
end;
函数声明
function 函数名(参数列表): 返回值类型;
var
    变量名: 变量类型;
begin
    // 函数体
end;
判断语句
if 条件 then
begin
    // 条件成立时执行的语句
end
else
begin
    // 条件不成立时执行的语句
end;
循环语句

for 循环

for 变量 := 起始值 to 终止值 do
begin
    // 循环体
end;

while 循环

while 条件 do
begin
    // 循环体
end;
数组声明
var
   数组名: array[起始下标..终止下标] of 数组元素类型;
字符串操作

字符串长度

length(字符串变量);

字符串拼接

strcat(字符串变量1, 字符串变量2);
实例
输出 Hello World!
program HelloWorld;
begin
   writeln('Hello, World!');
end.
求和程序
program Sum;
var
   a, b, sum: integer;
begin
   a := 1;
   b := 2;
   sum := a + b;
   writeln('Sum is: ', sum);
end.
for 循环输出 0 到 9
program ForLoop;
var
   i: integer;
begin
   for i := 0 to 9 do
   begin
       writeln(i);
   end;
end.
判断输入的数是奇数还是偶数
program OddEven;
var
   num: integer;
begin
   write('Enter a number: ');
   readln(num);
   if num mod 2 = 0 then
   begin
       writeln(num, ' is even');
   end
   else
   begin
       writeln(num, ' is odd');
   end;
end.
参考