viết chương trình pascal tính diện tích và chu vi toàn phần của hình hộp chữ nhật 24/07/2021 Bởi Melanie viết chương trình pascal tính diện tích và chu vi toàn phần của hình hộp chữ nhật
Program giangtri; Uses crt; Var d,r,S:real; Begin Write (‘Chieu dai cua hinh hop’); Readln (d); Write (‘Chieu rong cua hinh hop’); Readln (r); S:=((d+r)*2*4+(d*r*2); Write (‘Dien tich hinh hop la’,S); Readln; End. P/s: Chu vi toàn phần là j ạ ? Bình luận
Program giangtri;
Uses crt;
Var d,r,S:real;
Begin
Write (‘Chieu dai cua hinh hop’);
Readln (d);
Write (‘Chieu rong cua hinh hop’);
Readln (r);
S:=((d+r)*2*4+(d*r*2);
Write (‘Dien tich hinh hop la’,S);
Readln;
End.
P/s: Chu vi toàn phần là j ạ ?