4/9

y=100
for i,1,3
read a$,b$
print 100,y+i*40,,format("ⓩⓒ4,,ⓥ25%s",a$)

input gxy(0)-100,gxy(1),답$,10,,,,,31,,,

if 답$=b$
text gxy(0)+20,gxy(1),"정답입니다",,15,244
pause
else
text gxy(0)+20,gxy(1),"다시 생각해보세요",,15,75
pause

pause
text
endif
next
data "다음중 가장 빠른 것은? ⓐ1,100,0","비행기"
data "가장 짧은 것은? ⓐ2,100,0","연필"
data "안녕하세요? ⓐ3,100,0,","네"