¿ayuda con programcion estructurada, arreglos?

hola, tengo una duda estoy haciendo un programa para la facu, este año se trabaja con programacion estrucuturada, usamos pascal xq es un buen compilador como para ir introduciendose en el mundo de la programacion.. en fin, la cuestion es q ahora estoy intentando hacer un programa y necesito pasar los valores q tengo almacenados en un arreglo unidimensional (vector) a un arreglo bidimensional (matriz), estoy teniendo problemas para hacerlo... si alguien me puede ayudar ya sea en pseucodigo o en pascal??? gracias!!

1 respuesta

Calificación
  • Anónimo
    hace 9 años
    Respuesta preferida

    seria algo asi

    program arreglo_matriz;

    uses crt;

    const

    maximo = 5;

    type

    vector = array [1..maximo*maximo] of integer;

    matriz1 = array [1..maximo,1..maximo] of integer;

    var

    vec:vector;

    matriz:matriz1;

    i,j,k:integer;

    begin

    randomize;

    j:=0;

    i:=1;

    for k:=1 to maximo*maximo do

    begin

    j:=j+1;

    vec[k]:=random(50);

    write (vec[k],' ');

    matriz[i,j]:=vec[k];

    if (j > maximo) then

    begin

    i:=i+1;

    j:=1;

    end;

    end;

    writeln;

    writeln;

    for i:=1 to maximo do

    begin

    for j:=1 to maximo do

    write (matriz[i,j],' ');

    writeln;

    end;

    readln;

    end.

    picas el arreglo dependiendo del numero de columnas q tenga la matriz, en este caso la matriz es cuadrada, para q todos los numeros del vector esten en la matriz

    el codigo q hace eso posible es el for q va hasta "maximo*maximo" ....si ya tu tienes un vector creado en otro lado puede quita el "vec[k]:=random(50) " q eso solo lo hacia para llenar el vector y poderlo mostrar por pantalla para q se viera como picaba el vector en la matriz

    saludos...espero haberte ayudado

¿Aún tienes preguntas? Pregunta ahora para obtener respuestas.