Hãu viết chương trình nhập vào hai cạnh a,b của hìmh chữ nhật.Tính và đưa ra màn hình chu vi của hình chữ nhật có cạnh a,b Giúp mình vs

Program hcn;

Uses crt;

Var: a,b: integer;

Dt,cv: real;

Begin

Clrsrc;

Write(‘ nhap a:’);

Readln(a);

Write(‘nhap b:’);

Readln(b);

Dt:= (a*b);

Cv:= (a+b)*2;

Write(‘ dien tich hcn la:’, dt:2:4);

Readln;

Write(‘ chi vi hcn la:’, cv:2:4);

Readln;

End.