MN GIÚP MINH VS. CẦN GẤP Ạ. Viết chương trình nhập vào chiều dài , chiều rộng của một hình chữ nhật, tính, in ra màn hình diện tích hình chữ nh

0 bình luận về “MN GIÚP MINH VS. CẦN GẤP Ạ. Viết chương trình nhập vào chiều dài <a>, chiều rộng <b> của một hình chữ nhật, tính, in ra màn hình diện tích hình chữ nh”

1. Uses crt;
   Var a,b ,s: integer;
   Begin
   Clrscr;
   Write(‘Nhap chieu dai a = ‘); readln(a);
   Write(‘Nhap chieu rong b = ‘); readln(b);
   s:=a*b;
   Writeln(‘Dien tich hinh chu nhat la: ‘,s:0:2);
   Readln
   End.

   Bình luận

2. program dientichhinhchunhat;

   uses crt;

   var s,a,b:real;

   begin

   clrscr;

   write (‘nhap chieu dai:’);readln (a);

   write (‘nhap chieu rong:’); readln (b);

   s:=a*b;

   writeln (‘dien tich hinh chu nhat la:’,s:4:2);

   readln;

   end.

   Bình luận