Câu 1:

a, sai. sửa: var dientich: integer;

b, sai. sửa: var bankinh: integer;

                        bankinh:=10;

c, sai. sửa: const hs=8;

d, sai. sửa: const tuotee=z;

e, sai. sửa: if x:=10 then x:=y;

g, sai. sửa: if a>b then a:=b else b:=a;

f, sai. sửa: if x>y then x=y;

h, sai. sửa: if x<=100 then x:=x+5 else x:=x-5;

Câu 2:

program kaito;

uses crt;

var a,b: integer;

begin

   clrscr;

   write('Nhap gia tri a: '); readln(a);

   write('Nhap gia tri b: '); readln(b);

   if a>b then write('So lon nhat la a');

   if a<b then write('So lon nhat la b')

   else write('Hai so bang nhau');

readln;

end.

Câu 3:

program kaito;

uses crt;

var s, tb, toan, văn, anh: real;

begin

   clrscr;

   write('Diem mon toan: '); readln(toan);

   write('Diem mon van: '); readln(van);

   write('Diem mon anh: '); readln(anh);

     s:=toan+van+anh;

     tb:=(toan+van+anh)/3;

   write('Diem tong: ',s:0:2);

   write('Diem trung binh: ',tb:0:2);

readln;

end.

CHÚC BẠN HỌC TỐT!!!