C1:
Var;
C2:
Program Tinh_CV_DT;
Uses crt;
Var a, b: integer;
CV, S: integer;
Begin
Clrscr;
Write('Chieu dai: '); Readln(a);
Write('Chieu rong: '); Readln(b);
CV:= (a+b)*2;
Writeln('Chu vi hinh chu nhat la: ',CV;
S:= a*b;
Writeln('Dien tich hinh chu nhat la: ',S);
Readln
End.
Mình không biết làm 2.1; 2.2; 2.3 !