HÃY VIẾT CHƯƠNG TRÌNH NHẬP VÀO 2 SỐ a và b là 2 cạnh của hình chữ nhật từ bàn phím .sau đó tính chu vi,diện tích rồi biểu thị kết quả ra màn hình
HÃY VIẾT CHƯƠNG TRÌNH NHẬP VÀO 2 SỐ a và b là 2 cạnh của hình chữ nhật từ bàn phím .sau đó tính chu vi,diện tích rồi biểu thị kết quả ra màn hình
Program CT_DT_HT;
Uses Crt;
Var a, b : integer;
c, d : real;
Begin
Clrscr;
writeln (‘chieu dai hcn la a =’);
Read (a);
writeln (‘chieu rong hcn la b =’);
Read (b);
c := (a+b)×2;
d := a×b;
writeln (‘chu vi hcn la ‘,c);
writeln (‘diện tích hcn la ‘,d);
Readln;
End.
uses crt;
var dt, cv, a, b: real;
begin
clrscr;
write(‘Nhap a: ‘); readln(a);
write(‘Nhap b: ‘); readln(b);
dt:=a*b;
cv:=(a+b)*2;
clrscr;
writeln(‘Dien tich hinh chu nhat: ‘, dt);
writeln(‘Chu vi hinh chu nhat: ‘, cv);
readln
end.