Viết chương trình tính Diện Tích hình chữ nhật với chiều Dài và chiều Rộng nhập vào từ bàn phím Biết công thức tính Diện Tích hình chữ nhật là : S=chiều dài .chiều rộng

2 câu trả lời

$#QLinkVNxWCDI$

Cấu trúc chương trình như sau:

program HCN;
uses crt;
var dai,rong,S: integer;
begin
clrscr;
writeln('Nhap do dai chieu dai: '); readln(dai);
writeln('Nhap do dai chieu rong: '); readln(rong);
S:=dai*rong;
writeln('Dien tich hinh chu nhat tren la: ',S); 
readln;
end.

program bai_giai;
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 la:',a*b);
 readln
end.