Mọi người giúp em với ạ Em cảm ơn

Câu 32: A
Câu 33: B
Câu 34: B
Câu 35: C
Câu 36: A
Câu 37: D
Câu 38: A
Câu 39: A
Câu 40: D

D1 không có đề

Bài 1 (D2)

uses crt;
var ny, by: integer;
begin
    write('Nhap nam hien tai: '); readln(ny);
    write('Nhap nam sinh: '); readln(by);
    writeln('Nam nay ban ', ny - by, ' tuoi');
end.

Bài 2 (D2)

uses crt;
var a,b,d,x: integer;
begin
    write('a = '); readln(a);
    write('b = '); readln(b);
    write('d = '); readln(d);
    write('x = '); readln(x);
    writeln(a*x*x*x+b*x*x+d);
end.