Viết chương trình, tính và in ra màn hình với chiều dài và chiều rộng từ bàn phím

2 câu trả lời

Program Chu_nhat;

uses crt;

Var a, b, S, CV: real;

Begin

Write('Nhap chieu dai:'); readln(a);

Write('Nhap chieu rong:'); readln(b);

S := a*b;

CV := (a+b)*2;

Writeln('Dien tich hinh chu nhat la:',S);

Writeln('Chu vi hinh chu nhat la:',CV:10:2);

readln;

end.

Program chuongtrinh;

Uses crt;

Var a,b:integer ;

Begin

Write ( 'nhap chieu dai cua hinh chu nhat',a);

Readln(a);

Write('nhap chieu rong cua hinh chu nhat',b);

Readln

End.

Trong đề bài đâu có yêu cầu tính chu vi với diện tích đâu nhỉ?