câu1

program        từ khóa

pi                     biến

hinhtron          tên

const                hằng

chuvi                 biến

dientich             biến

write                  từ khóa

end.                   từ khóa

câu 3

hai chương trình đều sai vì khai báo biến không đc nằm trong phần thân chương trình mà nó thuộc phần khai báo

câu 4

intput 2 số bất kỳ

output tính tổng, hiệu,tích 

intput bán kính của hình tròn

output tính chu vi, diện tích 

intput một cạnh hình vuông

output tính chu vi, diện tích 

intput hai cạnh của hình chữ nhật

output tính chu vi, diện tích 

var a,b tong,hieu,tich:integer

begin

        write('nhap so a '); read (a);

         write('nhap so b '); read (b);

          tong:a+b;hieu:=a-b;tich:=a*b;

        write('tong la ',tong);

        write('hieu la ',hieu);

         write('tich la ',tich);

end.

chương trình 3

var a,dt,cv :integer

begin

     write('nhập vào canh hinh vuong');read(a)

      dt:=a*a;cv:= a*4;

      writeln('dien tich la',dt); 

       writeln('chu vi la',cv); 

readln

end.     

chương trình 4  

var a,b,dt,cv :integer

begin      

      write('nhập vào canh dai hinh CN');read(a)

      write('nhập vào canh rong hinh CN');read(b)

      dt:=a*b;cv:=( a+b)*2;

      writeln('dien tich la',dt); 

       writeln('chu vi la',cv); 

readln

end.