when green flag clicked
clear
set pen size to (3)
pen down
pen up
go to x: (0) y: (0)
point in direction (90 v)
move (100) steps
turn ccw ((180) - (angle)) degrees
move (100) steps
say [The angle you entered is an acute angle.] for (3) secs
say [The angle you entered is a right angle.] for (3) secs
say [The angle you entered is an obtuse angle.] for (3) secs
say [The angle you entered is a straight angle.] for (3) secs
say [The angle you entered is a reflex angle.] for (3) secs
ask [Enter an angle between 0 and 360 (not including 0 and 360):] and wait
set [angle v] to (answer)
if <<(angle) > [0]> and <(angle) < [90]>> then
end
if <(angle) = [90]> then
end
if <<(angle) > [90]> and <(angle) < [180]>> then
end
if <(angle) = [180]> then
end
if <(angle) > [180]> then
end