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