Basic - programa divisibilidad en gwbasic

   
Vista:

programa divisibilidad en gwbasic

Publicado por m.a. (54 intervenciones) el 23/03/2017 12:46:18
new
10 input " dime un numero " ; a$
20 input " dime un numero " ; b$
30 input " dime un numero " ; c$
40 input " dime un numero " ; d$
50 input " dime un numero " ; e$
60 let a$ = 100/2
70 let b$ = 50/2
80 let c$ = 35/2
90 let d$ = 13/2
100 let e$ = 1/1
110 goto a$,b$,c$,d$,e$,
120 data a$,b$,c$,d$,e$,
130 print a$ " 50 "
140 print b$ " 25 "
150 print c$ " 11 "
160 print d$ " 1 "
160 print e$ " 0 "
170 save
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder