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

2 câu trả lời

Source Code Tính Chu Vi Và Diện Tích Hình Vuông 

#Độ Dài Một Cạnh
a = float(input("Nhập Độ Dài Một Cạnh: "))
#Nửa Chu Vi
print("\nNửa Chu Vi Hình Vuông: " + str((a * 4) / 2))
#Chu Vi 
print("Chu Vi Hình Vuông: " + str(a * 4))
#Diện Tích
print("Diện Tích Hình Vuông: " + str(a**2))

Tính chu vi và diện tích bằng pascal

Program CT;

Uses crt;

Var a,b:real;

Begin

Write('Nhap chieu dai: '); Readln(a);

Write('Nhap chieu rong: '); Readln(b);

Writeln('Chu vi hinh chu nhat la: ',(a+b)*2);

Writeln('Dien tich hinh chu nhat la: ',a*b);

Readln;

End.