M.n ơi giúp mk v ạ mk đang cần gấp Viết chương trình tính diện tích hình chữ nhật có chiều dài a, chiều rộng b.bằng ngôn ngữ pascal

0 bình luận về “M.n ơi giúp mk v ạ mk đang cần gấp Viết chương trình tính diện tích hình chữ nhật có chiều dài a, chiều rộng b.bằng ngôn ngữ pascal”

1. program chu_nhat;

   uses crt;

   var a,b,s, cv :real;

   begin

   write(‘nhap chieu dai: ‘);readln(a);

   writeln(‘nhap chieu rong: ‘); readln(b);

   s:=a*b;

   writeln(‘dien tich hinh chu nhat la: ‘,s);

   readln

   end.

   Chúc bạn học tốt

   Bình luận

2. program hcn;

   uses crt; 

   var

   a,b,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 nay la ‘,S);

   readln

   end.

   Bình luận