bài 1:

a)

((a+b)*(a+b))-(x/y)

b)

(b/((a*a)+b))

c)

((a*a)/(2*a+b))

bài 2:

uses crt;

var a,b,dt,cv: integer;

begin

clrscr;

write('nhap chieu dai: ') readln (a);

write('nhap chieu rong: ') readln (b);

s:=a*b;

cv:=(a+b)*2;

writeln ('chu vi la: ',cv);

writeln ('dien tich la: ',dt);

readln;

end.

câu 3:

uses crt;

var n: integer;

begin

clrscr;

write ('nhap n: ');  readln (n);

if n mod 2=0 then writeln ('n la so chan');

if n mod 2<>0 then writeln ('n la so le');

readln;

end.

1.

a. sqr(a+b)-x/y

b. b/(a*a+b)

c. a*a/(2*a+b)

2.

program btsydn;

uses crt;

  var a, b: real;

begin

          clrscr;

          write('Nhap chieu dai = '); readln(b);

          write('Nhap chieu rong = '); readln(a);

          writeln('Chu vi hinh chu nhat: ', (a+b)*2);

          writeln('Dien tich hinh chu nhat: ', a*b);

          readln

end.

3.

program btsydn;

uses crt;

  var a: real;

begin

          clrscr;

          write('Nhap a = '); readln(a);

          if a mod 2 = 0 then write(a, ' la so chan') else (a, ' la so le');

          readln

end.