Mensajes

El programa ingresa n elementos a un vector y determina si existe algún elemento repetido en el vector, y deberia indicar cuántas veces se repite, mostrar el elemento que se repite y la cantidad de veces que se repite.
Una ayuda please.

Código [Seleccionar] Expandir



void main()
{

      int n;
      int v[20];
      int va[20];
      int msj=0;
      int jjj=1;
      int i=0;
      int temporal;
      int contRepetido[20]={0};
      cout<<"\nIngrese cantidad de elementos:";
      cin>>n;
      for(i=0;i<n;i++){
              cout<<"\nIngrese elemento:v["<<i<<"]:";
              cin>>v[i];
                   for(int j=0;j<i;j++){
                          if(v[j]==v[i]){
                            va[jjj]= v[j] ;
                            contRepetido[jjj]++;

                            msj=1;
                            jjj++;
                            }
                   }
       }

      if(msj==1){
       cout<<"existen duplicados\n";
      for(int k=1;k<jjj;k++){
              cout<<va[k]<<"\t";
              cout<<contRepetido[k]<<"\n";

          }
      }else{
        cout<<"no existen duplicados\n";
      }

      system("PAUSE");
      return 0;
}



Buenas noches me podrian ayudar con este codigo, lo que intento hacer es separar de una fecha, el dia, mes y año y asignarlo a variables para luego hacer unos calculos, estoy usando la funcion strtok sin embargo me marca un error de:  An unhandled win32 exception ocurred in [nombredemiprograma], debe ser por lospunteros no se manipularlos bien.
A continuacion el codigo:

Código [Seleccionar] Expandir


#include <iostream.h>
#include <stdlib.h>
#include <cstring>

int main()
{
char *nacimiento;
      char *actual;
      char *ptr1;
      char *ptr2;
      char *vector1[3];
      char *vector2[3];
      int i=0;
      int j=0;

      cout<<"\nIngrese fecha de nacimiento:";
      cin>>nacimiento;

      ptr1 = strtok(nacimiento,"/");
      while(ptr1 != NULL)
      {
      vector1[j]=ptr1;
      ptr1 = strtok(NULL, "/");
      j++;
      }

      /*
      cout<<"\nIngrese fecha deseada:";
      cin>>actual;
      ptr2 = strtok(actual,"/");
      while(ptr2 != NULL)
      {
      vector2[i]=ptr2;
      ptr2 = strtok(NULL, "/");
      i++;
      }
              */
       cout<<vector1[0] <<endl;
       cout<<vector1[1] <<endl;
       cout<<vector1[2] <<endl;
       cout<<"\n";      /*
       cout<<vector2[0] <<endl;
       cout<<vector2[1] <<endl;
       cout<<vector2[2] <<endl;       */
      // ...........................................................
      system("PAUSE");
      return 0;


}



si lo ejecuto asi como esta no me marca error, es decir si asigna el valor del dia, mes y año del arreglo de la prmera fecha ingresada y lo muestra, pero si le quito el comentario y ejecuto el programa me sale el error mostrado arriba 
Si hay otra forma de hacer lo q estoy intentado en buena hora.
una ayuda por favor.

Saludos.
Gracias.

excelente muchas gracias amigo ya todo funciona oks
si tengo alguna otra duda lo postearé bajo otro tema
bueno nuevamente gracias por responder

Salu2 ..... 

Muchas gracias amigo , mira estoy tratando de hacer lo siguiente tengo un
archivo con 5 preguntas, ahora lo estoy dividiendo cada pregunta en un archivo aparte, asi como me dijiste funciona perfectamente pero para cada pregunta tengo q crear otro script y bueno yo lo quería implementar solo en un script, mi código es el siguiente:

@echo off
:: Esta variable es para capturar el nro de pregunta
set /a preg=1

:: esta es para saltar las lineas
set /a salta=1

:inicio
cls

set /a var=0

:: pregunto por el nro de pregunta y de acuerdo
:: a eso salto las lineas

if "%preg%"=="2" set /a salta=6
if "%preg%"=="3" set /a salta=6*2
if "%preg%"=="4" set /a salta=6*3
if "%preg%"=="5" set /a salta=6*4

:: con el comando for listamos todas las lienas del archivo .txt
for /f "skip=%salta% tokens=*" %%a in (test5.txt) do set j=%%a && call :ini

:ini
:: luego con el contador listamos solo las primeras 5 lineas q pasaron por el for
if '%var%'=='5' goto fin
set /a var=var+1

:: pasamos las 5 primeras lineas al archivo llamado prueba.txt
echo %j% >> P%preg%.txt
:: goto :eof


:fin
:: Aqui pregunto si es la ultima pregunta termina
if "%preg%" LEQ 5 goto salida

:: si no es la ultima aumenta el nro de pregunta
set /a preg+=1

:: regresamos al inicio para barrer las sigtes pregutnas
goto inicio

:salida


Sin embargo solo me toma la primera pregunta nada mas, el resto no las toma nose porque    sedebe poder hacer .. bueno nos vemos

Salu2

hola No_Nick excelente gracias por la respuesta  justo lo q estaba buscando
pero ahora tengo esta inquietud si por ejemplo quiero leer apartir de la linea 2 por ejemplo y solamente las 3 lineas consecutivas como podria hacer esa delimitacion.

Un salu2 amigo y nuevamente gracias por responder si se te ocurre algo
en buena hora 

hola a todos amigos miren tengo un archivo txt  con varias lineas ahora
lo q quiero es que por ejemplo tomar las cinco primeras lineas y mandarlo
a otro archivo, intente con este codigo: 

@echo off
cls
set /a r=0
for /f  "tokens=*" %%i in (test5.txt) do @echo %%i && set /a r +=1 && if "%r%"=="5" @echo %%i>>1.txt

Este script se me ocurrio pero igualno funciona en realidad no tengo muchas ideas de como podria hacer agradeceria sugerencias 
un salu2 a todos

Hola amigo gracias por responder, te comento hice lo q dijiste
puse un control Datetimepicker lo llame DtpFecha el condigo es este:

Código [Seleccionar] Expandir


........
.Parameters.Add("@Fech", SqlDbType.DateTime).Value = DtpFecha.Value
........


sin embargo me sale el mismo error 
ya no se q hacer .... 

hola a todos mi problema es el siguiente lo q sucede es q tengo una tabla Ord/compra en la misma hay un campo fecha definido como datetime, ahora al tratar de insertar un registro desde el visual 2005, mi codigo es el siguiente:

Código [Seleccionar] Expandir


lblfecha.Text = Date.Now.ToString
........

With cmdOrden
  .Connection = cnx
  .Transaction = T
  .CommandText = "sp_Agrega_Orden_Compra"
  .CommandType = CommandType.StoredProcedure
  .Parameters.Add("@IdOrden", SqlDbType.Int, 4).Direction =     ParameterDirection.Output
  .Parameters.Add("@CodEmp", SqlDbType.Char, 5).Value = lblemp.Text
  .Parameters.Add("@Fech", SqlDbType.DateTime).Value = lblfecha.Text
  .Parameters.Add("@CodLab", SqlDbType.Char, 4).Value = CboLaboratorio.SelectedValue
  .Parameters.Add("@Estado", SqlDbType.VarChar, 20).Value = lblEstado.Text
End With

Try
cmdOrden.ExecuteNonQuery() .......

al ejecutarlo me marca error con el mensaje: Error de sintaxis al convertir una cadena de caracteres a datetime 
intente con esto DateTime.Parse(lblfecha.Text) pero igual me sale el mismo error porfas como podria hacerlo, desde ya
muchas gracias ........ 

Hola a todos quisiera utilizar el controlador ansi.sys para poder ponerle colores
a mi script, el problema es que en el XP no esta el config.sys, en el w98 si esta y me funciona, sin embrgo averiguando encontre que en el Xp se llama config.nt
e hice lo mismo que el w98 le agregue al final del archivo config.nt lo siguiente:

device=%systemroot%\system32\ansi.sys

reinicie la pc y trate de utilizar los carateres escape para darle color y no me funciona, derrepnte en el Xp se carga el controlador de otra manera nose
agradeceria su ayuda desde ya gracias ......... 

yo tamb quisiera!!!!!!!!!!!!!! espero q se de el curso ... suerte