Nhập vào 2 cạnh của một hình chữ nhật. In ra màn hình diện tích và chu vi của nó. Giúp e ạ

2 câu trả lời

Program hinh_chu_nhat ;
Uses Crt;
Var a,b,S,C: real;
Begin
   Clrscr;
   Writeln(‘ TINH DIEN TICH & CHU VI HINH CHU NHAT:’);
   Writeln(‘ TINH DIEN TICH & CHU VI HINH CHU NHAT');
   Write('Nhap chieu dai='); readln(a);
   Write('Nhap chieu rong=');readln(b);
   S:=a*b;
   C:=(a+b)*2;
   Writeln('Dien tich hinh chu nhat la:’,S:6:2);
   Writeln('Chu vi hinh chu nhat:',C:6:2);
   Readln;
End.

Đừng quên chọn câu tlhn cho mình nha

Program HINH_CHU_NHAT;
Uses Crt;
Var a,b,s,c: real;
Begin
   Clrscr;
   Writeln(‘ TINH DIEN TICH & CHU VI HINH CHU NHAT:’);
   Writeln(‘————————————————————–‘);
   Write('Nhap chieu dai='); readln(a);
   Write('Nhap chieu rong=');readln(b);
   s:=a*b;
   c:=(a+b)*2;
   Writeln('Dien tich hinh chu nhat la:’,s:6:2);
   Writeln('Chu vi hinh chu nhat:',c:6:2);
   Readln;
End.