Viết chương trình tính chu vi, diện tích hình vuông có cạnh a ( được nhập từ bàn phím ) * mình cần cách làm và cả công thức tính *

-Đáp Án:

Program hinh_vuong;

   Uses crt;

   Var a, Chu_vi,dien_tich: read;

Begin

   Clrscr;

   Write(‘Nhap canh a:  ’); Readln(a);

Chu_vi:= 4*a;

Dien_tich:=a*a;

    Writeln(‘Chu vi =  ‘,Chu_vi);

    Writeln(‘Dien tich =’,dien_tich);

     Readln

End.

- Các bước Giải:

• Hình vuông: chu_vi=4a; dien_tich=a²

- Khai báo 3 biến: a, Chu_vi, dien_tich

- Chương trình:

     + Nhập giá trị cho a:

         Write(‘Nhap canh hinh vuong:  ’); Readln(a);

     + Tính chu_vi, dien_tich:

         Chu_vi:= 4*a;

         Dien_tich:=a*a;

      + Xuất kết quả ra màn hình:

         Writeln(‘Chu vi =  ‘,Chu_vi);

         Writeln(‘Dien tich =’,dien_tich);

- Kết thúc chương trình.

#Hãy cho mình câu trả lời hay nhất và vote 5 sao nhé!
#Chúc bạn học tốt!