hãy viết chương trình nhập vào 2 cạnh của hình chữ nhật . sau đó tính chu vi và diện tích rồi hiểu thị ra màn hình

0 bình luận về “hãy viết chương trình nhập vào 2 cạnh của hình chữ nhật . sau đó tính chu vi và diện tích rồi hiểu thị ra màn hình”

1. Uses crt;

   Var a,b,cv,s:Longint;

   Begin

   Clrscr;

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

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

   Cv:=(a+b)*2;

   S:=a*b;

   Writeln(‘ Chu vi cua hinh chu nhat la: ‘,cv);

   Writeln(‘Dien tich cua hinh chu nhat la: ‘,s);

   Readln

   End.

   Bình luận

2. program az;

   uses Crt;

   var a,b,CV,S : integer;

   begin

   clrscr;

   Write(‘ Chieu dai la :’); readln(a);

   Write(‘ Chieu rong la :’); readln(b);

   CV := (a + b)*2;

   S := a*b;

   Write(‘ Chu vi la :’,CV);

   Write(‘ Dien tich la :’,S);

   readln

   end.

   Bình luận