Viết chương trình nhập vào 2 cạnh của hình chữ nhật. Tính chu vi và diện tích của hình chữ nhật đó

0 bình luận về “Viết chương trình nhập vào 2 cạnh của hình chữ nhật. Tính chu vi và diện tích của hình chữ nhật đó”

1. program azkp;

   uses Crt;

   var a,b,CV,S : real;

   begin

   clrscr;

   Write(‘ Chieu dai la :’); readln(a);

   Write(‘ Chieu rong la : ‘); readln(b);

   CV := (a + b)*2;

   S := a*b;

   Write(‘ Chu vi la :’,CV);

   Write(‘ Dien tich la :’,S);

   readln

   end.

   Bình luận

2. program hinh_chu_nhat;

   uses crt;

   var a, b, S, P: real;

   begin

   clrscr;

   writeln(‘Nhap chieu dai hcn la:’); readln(a);

   writeln(‘Nhap chieu rong hcn la:’); readln(b);

   P:=(a+b)*2;

   S:=(a*b);

   writeln(‘Chu vi hcn la:’,P:4:2);

   writeln(‘Dien tich hcn la:’,S:4:2);

   readln

   end.

   Bình luận