• Lunes 13 de Julio de 2020, 15:26

Mostrar Mensajes

Esta sección te permite ver todos los posts escritos por este usuario. Ten en cuenta que sólo puedes ver los posts escritos en zonas a las que tienes acceso en este momento.


Mensajes - Angelfsg

Páginas: [1]
1
Pascal / Re:pascal
« en: Martes 16 de Agosto de 2011, 16:34 »
Muy sencillo, una vez que tienes todos los huecos de la matriz rellenos, haces dos bucles anidados (uno para cada fila de la matriz), quedándote algo similar a esto:

Código: Pascal
  1. VAR
  2.    i, j, division: INTEGER;
  3.    ...
  4.  
  5. BEGIN
  6.    ...
  7.    ...
  8.    ...
  9.    FOR i:= 1 TO 10 DO
  10.       FOR j:= 1 TO 12 DO
  11.          BEGIN
  12.             division:= matriz[i, j] DIV 10;
  13.             IF matriz[i, j] MOD 10 = 2 THEN
  14.                writeln(matriz[i, j]);
  15.          END;
  16. END.

Es un algoritmo que se puede hacer de forma mucho más eficiente y modular, pero la idea es esta ;)
un saludo.

2
Pascal / [Código Fuente] Re:Vuelos
« en: Martes 16 de Agosto de 2011, 16:23 »
Genial aporte!!!  :bravo:

Páginas: [1]