viết chương trình in ra màn hình diện tích và chu vi hình chữ nhật.
0 bình luận về “viết chương trình in ra màn hình diện tích và chu vi hình chữ nhật.”
Program BTT; Uses crt; Var a,b,p,s: extended; Begin Clrscr; Write(‘Nhap chieu dai va chieu rong: ‘); Readln(a,b); p:=(a+b)*2; s:=a*b; Writeln(‘Chu vi la: ‘,p:0:2); Write(‘Dien tich la: ‘,s:0:2); Readln End.
Program BTT;
Uses crt;
Var a,b,p,s: extended;
Begin
Clrscr;
Write(‘Nhap chieu dai va chieu rong: ‘); Readln(a,b);
p:=(a+b)*2;
s:=a*b;
Writeln(‘Chu vi la: ‘,p:0:2);
Write(‘Dien tich la: ‘,s:0:2);
Readln
End.