Título: ayuda con pascal por fa Publicado por: Naly09 en 21 Agosto 2010, 22:11 pm Por favor necesito realizar en pascal un menu con 3 opciones, eso ya lo hice pero tengo q hacerlo con vectores:
1.ingresar=se ingresa datos de 1 a 1 hasta 6 cuando llega a 6 tengo q poner q el vector esta lleno; 2. borrar= este borra el primer dato del vector y cambia de posiciones el vector2 pasa hacer el 1 y asi sucesivamente El problema q tengo es q se supone q cuando borro uno puedo ingresar otro numero pero el programa no me deja me pone q el vector todavia esta lleno... alguien me puede ayudar con esto por fa.... aqui esta el procedimiento q tengo hecho; '1': Begin clrscr; con:=con +1; if con>=7 then writeln('cola llena') else begin writeln('Digite Numero'); readln(num); v1[con]:=num; writeln('HAY ',con,'CAMPOS LLENOS'); end; readkey; alter(opcion); end; '2': Begin clrscr; write('BORRANDO DATO'); for i:=1 to 6 do if i=6 then v1[6]:=0 else v1:=v1[i+1]; con:=con-1; readkey; alter(opcion); end; PORFA AYUDENME |