變數

二進制, 十進制, 十六進制
010101010 170
在二進制中, 由於只有0,1
所以在電腦程序設計中,
對於電腦中某一段地址的解釋
必先要有一個定義!數據類型

所以在設計程式時, 每一個變數
都必先要定義數據類型
var
  c : char;
c:=67  c-->

寫一條程序, 輸入球的半徑,
然後輸出球的體積.
輸出球的表面積.

每一個變數, 就是一種概念
運算符號 + - * / div

var
  r : integer;
  v,s: real;
const
  pi = 3.141592654;
begin
  readln(r);
  v :=4 / 3*pi*r*r*r;
  s := 4*pi*r*r;
 
  writeln(v);
  writeln(s);
end;

輸入學生的分數, 然後輸出
優 (80,100]
良 [60,80]
差 [0,60)
var
  a:integer;
begin
  readln(a);
  if a<60 then
     writeln('Fail')
   else writeln('Pass');

end.

very good (80,100]
good [60,80]
fail [0,60)

var
  mark : integer;
begin
  if (mark<60) then writeln ('fail')
    else if mark>80 then writeln ('very good')
       else writeln('good');
end.

very good (80,100]
good [60,80]
fail [0,60)
var
  a,b : integer;
begin
  readln(a);
  if (a>=80) and (a<=100) then
  writeln('very good');
  if (a>=60) and (a<80) then
  writeln('good');
  if (a>=0) and (a<60) then
  writeln('fail');
end.

(0<x)  and (x<8)

for
while
repeat until

case

for  變量 := 初值 to 終值 do
  語句;

變量 : integer
初值 to 終值 (意思是終值大於初值)
初值 to 終值  (初值等於終值)
初值 downto 終值(意思是終值小於初值)

for 最多時就是與數組一齊使用

var
  n,i : integer;
  a : array[1..100] of integer;
begin
  readln(n);
  for i:= 1 to n do
    readln(a[i]);
end;