Question

em hãy viết chương trình pascal hoàn chỉnh để tính chu vi (cv)và diện tích(s) của hình vuông có độ dài cạnh (a) được nhập vào từ bàn phím. thông báo kết quả (cv) và(s) ra màn hình

 

giúp mình với ạ sossss

Answer 1

Var a,cv,s:real;

Begin

Write('Canh hinh vuong a = ');readln(a);

cv:=4*a;

S:=a*a;

Write('Chu vi la ',cv:10:2,' dien tich la ',s:10:2);

Readln;

End.