Hình vuông:

Input: Độ dài cạnh;

Output: Chu vi, diện tích hình vuông.

- Thuật toán:

B1: Nhập cạnh a;

B2: cv←a*4; S←a*a;

B3: Thông báo kết quả và kết thúc thuật toán.

-

program hinh_vuong;
uses crt;
var a,cv,S:real;
Begin
    clrscr;
    write('a = ');readln(a);
    cv:=a*4;
    S:=a*a;
    writeln('Chu vi hinh vuong: ',cv:2:2);
    write('Dien tich hinh vuong: ',S:2:2);
    readln
End.