comparto programas en gwbasic
Publicado por m.a. (54 intervenciones) el 16/10/2017 17:18:47
new
10 input " dime un numero " ; a$
20 input " dime un numero " ; b$
30 let c$ = 6000
40 let d$ = 100*9
50 goto a$,b$,c$,d$,
60 data a$,b$,c$,d$,
70 print c$ " ina rotativa imprime en 60 segundos 6000 paginas "
80 print d$ " una rotativa de una imprenta imprimira en 90 segundos 9000 paginas "
90 save
10 input " dime un numero " ; a$
20 input " dime un numero " ; b$
30 let c$ = 6000
40 let d$ = 100*9
50 goto a$,b$,c$,d$,
60 data a$,b$,c$,d$,
70 print c$ " ina rotativa imprime en 60 segundos 6000 paginas "
80 print d$ " una rotativa de una imprenta imprimira en 90 segundos 9000 paginas "
90 save
Valora esta pregunta


0