DATA使えば良さそう(不規則変化のもののみ)。
ing系は不規則がないので単純にingつけるだけで良さそう(もちろん最後の文字も判断する)。
例)
DATA "go","went","gone"
DATA "come","came","came"
DATA "have","had","haven"
DATA ""
DIM VERB$[0]
DIM PAST$[0]
DIM PASTP$[0]
WHILE 1
READ V$
IF VERB$=="" THEN BREAK
READ P$
READ PP$
PUSH VERB$,V$
PUSH PAST$,P$
PUSH PASTP$,PP$
WEND