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!!!
