defint a-z

starta = 15 : startb=5 :startc=10 : startd = 40
call ex (startb,startc)
call tri (startd)
call square(starta)
end