Program VD;
Var S,C,D,R; longint;
Begin
Writeln (' Nhap chieu dai cua hinh chu nhat:' );
Readln (D);
Writeln (' Nhap chieu rong cua hinh chu nhat: ');
Readln (R);
S:= D*R;
C:= (D+R)/ 2;
Writeln (' Dien tich hinh chu nhat la: ', S);
Writeln (' Chu vi hinh chu nhat la: ', C);
Readln;
end.
_ Nếu tin học lớp 8 không yêu cầu viết phần khai báo thì bạn chép từ chỗ Begin nhé_