Hãu viết chương trình nhập vào hai cạnh a,b của hìmh chữ nhật.Tính và đưa ra màn hình chu vi của hình chữ nhật có cạnh a,b Giúp mình vs

2 câu trả lời

Program hcn;

Uses crt;

Var: a,b: integer;

Dt,cv: real;

Begin

Clrsrc;

Write(' nhap a:');

Readln(a);

Write('nhap b:');

Readln(b);

Dt:= (a*b);

Cv:= (a+b)*2;

Write(' dien tich hcn la:', dt:2:4);

Readln;

Write(' chi vi hcn la:', cv:2:4);

Readln;

End.

uses crt;

  var a, b: real;

begin

  clrscr;

  write('Nhap a, b = '); readln(a,b);

  writeln('Chu vi hinh chu nhat la: ', (a+b)*2);

  readln

end.

Câu hỏi trong lớp Xem thêm