Cho chiều dài và chiều rộng của hình chữ nhật là các số nguyên được nhập từ bàn phím. In lên màn hình diện tích của hình chữ nhật : .Cho chiều dài và

0 bình luận về “Cho chiều dài và chiều rộng của hình chữ nhật là các số nguyên được nhập từ bàn phím. In lên màn hình diện tích của hình chữ nhật : .Cho chiều dài và”

1.          Program HCN;

            Uses Crt;

            Var a , b : integer;

                    S : integer;

   Begin

            Clrscr;

            Write ( ‘Nhap chieu dai:’ );

            Readln (a);

            Write ( ‘Nhap chieu rong:’ );

            Readln (b);

            S : = a * b;

            Writeln ( ‘Dien tich hinh chu nhat:’ , S );

            Readln

   End.

   Bình luận

2. program dthcn;

   uses crt;

      var cd, cv, dt: integer;

   begin

      clrscr;

      write(‘Nhap cd = ‘); readln(cd);

      write(‘Nhap cr = ‘); readln(cr);

      dt:=cd*cr;

      writeln(‘Dien tich hinh chu nhat la: ‘, dt);

      readln

   end.

   Bình luận