Bài 1:

-Kiểu dữ liệu phù hợp là kiểu số thực (real)

Bài 2:

a) a*x*x*x+b*x*x+c*x+d

b) 1/(1+x)*(1+x)-2/(x*x+1)

Bài 3: (Lười quá, nhường bạn khác nhé :D)

Program vesao;

Uses crt;

Begin

Clrscr;

Writeln('                    x');

Writeln('               x        x');

Writeln('          x         x         x');

Writeln('     x          x        x          x');

Writeln(' x          x         x          x          x');

Readln;

End.

Đây nha: 

Program dientich;

Uses crt;

Var d,s:real;

Begin

Clrscr;

Write('Nhap do dai ban kinh: '); Readln(d);

s:=d*d*3.14;

Writeln('Ban kinh hinh tron la: ',s:2:2);

Readln;

End.