Red de conocimiento informático - Problemas con los teléfonos móviles - Programación VB: Suponga que la longitud del papel es lo suficientemente larga y el grosor es de 0,1 mm. El grosor se duplica una vez doblado por la mitad. Ahora doble el papel por la mitad hasta que el grosor total supere el Everest.

Programación VB: Suponga que la longitud del papel es lo suficientemente larga y el grosor es de 0,1 mm. El grosor se duplica una vez doblado por la mitad. Ahora doble el papel por la mitad hasta que el grosor total supere el Everest.

subcomando privado1_click()

m=0.1

hacer hasta m>88481300

m=m*2

i=i+1

bucle

msgbox "Número de pliegues:" & i

fin del sub

上篇: Frases y citas clásicas de "Ella es hermosa" 下篇: Problemas de seguridad de subprocesos de servlet

Artículos populares