Viết chương trình tính diện tích hình chữ nhật biết chiều dài và chiều rộng nhờ từ bàn phím

0 bình luận về “Viết chương trình tính diện tích hình chữ nhật biết chiều dài và chiều rộng nhờ từ bàn phím”

1. Program qtruong;

   Uses crt;

   Var a, b, s: integer;

   Begin

   Clrscr;

   Write (‘Nhap a va b: ‘); readln(a, b);

   S:=a*b;

   Writeln(‘Dien tich la: ‘,s);

   Readln

   End.

   Bình luận

2. uses crt;

   var a,b:longint;

   begin

   clrscr;

   write(‘Nhap chieu dai=’);readln(a);

   write(‘Nhap chieu rong=’);readln(b);

   write(‘Dien tich hinh chu nhat: ‘,a*b);

   readln;

   end.

   Bình luận