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 đó
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 đó
By Amara
By Amara
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 đó
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.
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.