Shell 25-03-2023, 12:30
Buenas!.

Pues estaba liado con el tema de los arrays. Wink

¿ Os acordáis de cuando os decía que si un array contiene 10 enteros y cada uno de estos ocupa 4 bytes que debería ocupar 40 bytes el total  ?
Pues parece que no es así. Confused

Código:
'Creamos y asignamos
Private tabla1[100] As Integer

Public Sub Main()
 
  'Creamos
  Dim tabla2 As Integer[]
 
  'Asignamos
  tabla2 = New Integer[100]   
 
  Randomize

  Print "El objeto tabla1 ocupa: " & Str(Object.SizeOf(tabla1)) & " bytes"
  Print "El objeto tabla2 ocupa: " & Str(Object.SizeOf(tabla2)) & " bytes"
 
  'Llenamos el contenido de los arrays
  tabla1 = LlenarArray(tabla1)
  tabla2 = LlenarArray(tabla2)
 
  Print "----------------------------------"
  'No hay cambios  
  Print "El objeto tabla1 ocupa: " & Str(Object.SizeOf(tabla1)) & " bytes"
  Print "El objeto tabla2 ocupa: " & Str(Object.SizeOf(tabla2)) & " bytes"
 
End

Public Function LlenarArray(tabla As Integer[]) As Integer[]
 
  Dim longitud As Integer
    
  longitud = tabla.Max
 
 
  For i As Integer = 0 To longitud
      tabla = Rand(0, 2147483647)
  Next
 
  Return tabla
 
End

Salida:
 
Cita:El objeto tabla1 ocupa: 400 bytes
El objeto tabla2 ocupa: 40 bytes
----------------------------------
El objeto tabla1 ocupa: 400 bytes
El objeto tabla2 ocupa: 40 bytes


Saludos
Shell 24-03-2023, 17:35
Buenas!.

A gusto del consumidor. Pero sorprende al precio que encuentras 16GB.
Fijaros las referencias que se les hace a Linux.

¿Cuánta memoria necesita para ejecutar aplicaciones de Windows, Mac OS X o Linux?

Saludos
Shell 24-03-2023, 17:28
Buenas!.

En la mayoría de los cursos online se usa esto.

El curso de inglés cuando trabaja con las presentaciones parece que estas viendo un PowerPoint.
Otra cosa es el árbol de los temas. En juego entra la mensajería, el chat, compartir archivos y muchas más cosas.



SCORM: Qué es y сómo usarlo

Saludos
Páginas (560):    1 188 189 190 191 192 560   
Bienvenido, Invitado
Tienes que registrarte para poder participar en nuestro foro.
Recordarme?
Miembros: 288
Último miembro: shoUsho
Temas del foro: 1,729
Mensajes del foro: 8,987
Últimos temas
Paren...WAIT !!!
Foro: Aplicaciones/Fragmentos de Código
Último mensaje por: guizans, 25-08-2025, 14:49
Respuestas: 3 - Vistas: 448
GambOS
Foro: General
Último mensaje por: guizans, 20-08-2025, 13:58
Respuestas: 0 - Vistas: 310
Gambas y Wayland
Foro: General
Último mensaje por: guizans, 20-08-2025, 13:56
Respuestas: 6 - Vistas: 589
Odio a gb.Report
Foro: General
Último mensaje por: guizans, 19-08-2025, 10:40
Respuestas: 8 - Vistas: 939
Powered By MyBB, © 2002-2025 MyBB Group.
Made with by Curves UI.