Giúp mik vs ạ -Viết chương trình tính chu vi và diện tích hình chữ nhật?

0 bình luận về “Giúp mik vs ạ -Viết chương trình tính chu vi và diện tích hình chữ nhật?”

1. uses crt; 

    var cd,cr,cv,dt:integer;

   begin

    clrscr;

    write(‘chieu dai: ‘);readln(cd);

    write(‘chieu rong: ‘);readln(cr);

    cv:=(cd+cr)*2;

    dt:=cd*cr;

    writeln(‘Chu vi hinh chu nhat ‘,cv);

    writeln(‘Dien tich hinhf chu nhat ‘,dt);

   readln; end.

   Bình luận

2. program Chu_vi_hinh_chu_nhat ;

   uses crt ;

   var a,b: real ;

   begin

          clrscr ; C:=0

          writeln (‘Nhap canh a la’) ; readln (a) ;

          writeln (‘Nhap canh b la’) ; readln (b) ;

           C:= (a+b)*2 ;

          writeln (‘Chu vi hinh chu nhat:’, C:3:2) ;

          Readln ;

   End

   Bình luận