Two possible answers:
TO SQUARE
FD 25
RT 90
FD 25
RT 90
FD 25
RT 90
FD 25
RT 90
END
OR
TO SQUARE
REPEAT 4 [ FD 25 RT 90]
END
