Hãu viết chương trình nhập vào hai cạnh a,b của hìmh chữ nhật.Tính và đưa ra màn hình chu vi của hình chữ nhật có cạnh a,b Giúp mình vs

0 bình luận về “Hãu viết chương trình nhập vào hai cạnh a,b của hìmh chữ nhật.Tính và đưa ra màn hình chu vi của hình chữ nhật có cạnh a,b Giúp mình vs”

1. Program hcn;

   Uses crt;

   Var: a,b: integer;

   Dt,cv: real;

   Begin

   Clrsrc;

   Write(‘ nhap a:’);

   Readln(a);

   Write(‘nhap b:’);

   Readln(b);

   Dt:= (a*b);

   Cv:= (a+b)*2;

   Write(‘ dien tich hcn la:’, dt:2:4);

   Readln;

   Write(‘ chi vi hcn la:’, cv:2:4);

   Readln;

   End.

   Bình luận

2. uses crt;

     var a, b: real;

   begin

     clrscr;

     write(‘Nhap a, b = ‘); readln(a,b);

     writeln(‘Chu vi hinh chu nhat la: ‘, (a+b)*2);

     readln

   end.

   Bình luận