Basic - programa : rectificacion de base de datos. en gwbasic.

new
10 input " ¿ como me llamo ? " ; a$
20 input " ¿ en que calle vivo ? " ; b$
30 input " ¿ a que me dedico ? " ; c$
40 input " ¿ que edad tengo ? " ; d$
50 input " ¿ en que calle vivo ? " ; e$
60 input " ¿ en que barrio ? " ; f$
70 input " ¿ en que ciudad ? " g$
80 input " ¿ que codigo postal ? " ; h$
90 goto a$,b$,c$,d$,e$,f$,g$,h$,
100 data a$,b$,c$,d$,f$,g$,h$,
110 print a$ " carlos "
120 print b$ " en la calle sevilla "
130 print c$ " soy administrativo "
140 print d$ " 40 años "
150 print e$ " en la calle sevilla "
160 print f$ " esn las delicias "
170 print g$ " en valladolid "
180 print h$ " 67012 "
190 save