A.
Câu 1:
 - Bài lập trình Pascal gồm có 2 phần:
  + Khai báo(Tên, Thư viện, Biến, Hằng,...)
     (Phần này không bắt buộc)
  + Thân chương trình: Gồm tất cả câu lệnh để thực hiện chương trình.
Câu 2:
 - Cú pháp khai báo biến là: var tên biến(1), biến(2), ...: kiểu dữ liệu
  VD: var n: byte;
Câu 3:
 - Cú pháp khai báo hằng: const tên hằng = giá trị
  VD: const pi = 3.14;
B.
1. 
uses crt;
var r: real;
const pi = 3.14;
begin
clrscr;
    r:=5.5;
 writeln('chu vi hinh tron la: ',r*2*pi:6:2);
readln;
end.
2.
uses crt;
var a, b, c, s, t: word;
 d: real;
begin
clrscr;
 write('nhap a, b, c: '); readln(a, b, c);
  s:=a+b+c;
   t:=a*b*c;
           d:=s/3;
         writeln('tong 3 so: ',s);
   writeln('tich 3 so: ',t);
    writeln('tbc 3 so: ',d:6:2);
readln;
end.
3.
uses crt;
var h, a: word;
 s: real;
begin
clrscr;
 write('nhap chieu cao: '); readln(h);
  write('nhap canh day: '); readln(a);
    s:=(h*a)/2;
 writeln('dien tich tam giac la: ',s:6:2);
readln;
end.

A. Lý thuyết

Câu 1 :

- Chương trình Pascal gồm 2 phần: Phần khai báo và phần thân

Câu 2 :

- Cú pháp : Var <danh sách biến> : <kiểu dữ liệu>;

- Ví dụ : Var a, b : real;

Câu 3 :

- Cú pháp : Const <tên hằng> = <giá trị hằng>;

- Ví dụ : Const x = 10;

B. Bài tập

Bài tập 1 :

program A01;

uses crt;

const pi = 3.14;

var cv, dt, r : real;

begin

clrscr;

write('Nhap ban kinh r = '); readln(r);

cv := 2 * r * pi;

dt := r * r * pi;

writeln('Chu vi hinh tron = ', cv : 2 : 2);

writeln('Dien tich hinh tron = ', dt : 2 : 2);

readln

end.

Bài tập 2 :

program A01;

uses crt;

var a, b, c : integer;

begin

clrscr;

write('Nhap ba so a, b, c = '); readln(a, b, c);

writeln('Tong 3 so = ', a + b + c);

writeln('Tich 3 so = ', a * b * c);

writeln('Trung binh cong 3 so = ', (a + b + c) / 3 : 2 : 2);

readln

end.

Bài 3 :

program A01;

uses crt;

var a, h, s : real;

begin

clrscr;

write('Nhap a, h = '); readln(a, h);

s := a * h * 0.5;

write('Dien tich tam giac = ', s : 2 : 2);

readln

end.