Câu a:

Chu vi hình vuông

a = float(input("Nhập Độ Dài Một Cạnh: "))
#Chu Vi 
print("Chu Vi Hình Vuông: " + str(a * 4))

Chu vi HCN

#Chiều Dài
length = float(input("Nhập Chiều Dài: "))
#Chiều Rộng
width = float(input("Nhập Chiều Rộng: "))
#Chu Vi
print("\nChu Vi Hình Chữ Nhật: " + str((length + width) * 2))

Chu vi hình a

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))

Câu 2:

Dt Hình vuông

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

diên tích HCN 

#Chiều Dài
length = float(input("Nhập Chiều Dài: "))
#Chiều Rộng
width = float(input("Nhập Chiều Rộng: "))
#Diện Tích
print("Diện Tích Hình Chữ Nhật: " + str(length * width))

Diên tích hình a:

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

uses crt;

var a : integer;

begin

clrscr;

write('nhap canh a :');readln(a);

writeln('chu vi hinh vuong :', a * 4);

writeln('chu vi hinh chu nhat :', (2 * a + a) * 2);

writeln('chu vi hinh A :', 2 * a * 4);

writeln('dien tich hinh vuong :', a * a);

writeln('dien tich hinh chu nhat :', (2 * a * a));

writeln('dien tich hinh A :', (a * a) + (2 * a * a));

readln

end.