Viết chương trình nhập vào độ dài cạnh một hình vuông. Tính và in ra màn hình diện tích, chu vi, độ dài đường chéo của hình vuông đó

1 câu trả lời

program hinh_vuong;
uses crt;
var a, c, s, b : real;
begin
clrscr;
write('nhap canh hinh vuong:');readln(a);
c := a*4;
s := a*a;
b := sqrt(sqr(a) + sqr(a));
writeln(' chu vi hinh vuong la :', c:8:2);
writeln('dien tich hinh vuong la :', s:8:2);
writeln(' do dai duong cheo la :', b:8:2);
readln
end.

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