Mostrando entradas con la etiqueta Otros. Mostrar todas las entradas
Mostrando entradas con la etiqueta Otros. Mostrar todas las entradas

Fibonacci C++

Serie Fibonaci    0 1 1 2 3 5 8 13 21

Para ver un listado de series mas completo...haz clic aqui

#include<stdio.h>
#include<conio.h>

void main()
{
int n,a,b,c,i;
clrscr();
printf("N: ");
scanf("%d",&n);

a=0;b=1;c=0;
printf("0 \n");
for(i=0;i<n;i++)
{
a=b;
b=c;
printf("%d \n",a+b);
c=a+b;
}
getch();
}

Iniciales de Nombres

#include<conio.h>
#include<stdio.h>
#include<string.h>
void main()
{
char *nombre;
char letra;
int i,lon,n=0;
char iniciales[5];

clrscr();
gets(nombre);
lon=strlen(nombre);//calculamos longitud de la cadena

iniciales[n]=nombre[0];//copiamos la primera inicial
n++;//contador de numero de caracteres de la cadena

for(i=1;i<lon;i++)
if(nombre[i]==' ')// lbuscamos un espacio
{
iniciales[n]='.';
n++;
iniciales[n]=nombre[i+1];//agregamos la letra a la cadena
n++;
}
iniciales[n]=NULL;//ponemos final a la cadena
puts(iniciales);
getch();

}

Cambiar vocales por letra que mas se repite

PROGRAMA PARA CAMBIAR LA LETRA QUE MAS SE REPITE DE LA CADENA POR LAS VOCALES

#include<conio.h>
#include<stdio.h>
#include<string.h>
#include<ctype.h>

int vocalea(char c)
{
int x;
x=0;
c=toupper(c);
if(c=='A' || c=='E'|| c=='I' || c=='O' || c=='U')
x=1;
return x;
}

void main()
{
int c[27];
char *cadena;
int i,len;
int may,pos;

clrscr();
printf("Cadena: ");
gets(cadena);

len=strlen(cadena);//calculamos la longitud de la cadena
for (i=0;i<27;i++)//iniciamos el contador
c[i]=0;

for(i=0;i<len;i++)//cuenta las cantidad  por cada letra
c[toupper(cadena[i])-65]++;
may=-1;

for(i=0;i<27;i++)//busca la letra que mas se repiute
if(c[i]>may)
{
may=c[i];
pos=i;
}
for(i=0;i<len;i++)//cambia la letra q mas se repite por las vocales
if(vocalea(cadena[i])==1)
cadena[i]=pos+65;
puts(cadena);
getch();
}
//includecpp.blogspot.com

Capturar Hora del Sistema

Pequeño programa, facil de entender para capturar y mostrar la hora del sistema, usa la biblioteca InCpp


Descargar aqui

Si no corre el programa, descargar la biblioteca aqui

Maximo Común Divisor en C++

Programa para hallar el MCD de la cantidad de números que el usuario elija.



#pragma hdrstop
#include
#include
#pragma argsused

void main(int argc, char* argv[])
{
int *x, n, y=1, i=2, c=0, menor,j;

cout<<"\n De cuantos numeros desea calcular el MCD? ";
cin>>n;

x=new int[n];

for(j=0; j
cout<<"\n ingrese "<< "Numero en la posicion<"<< (j+1) <<">";
cin>>x[j]; }

menor=x[0];

for(j=0; jif(x[j]menor=x[j];
}

do {

for(j=0; j if(x[j]%i!=0) {
c=1;
break; } }


if (c==0){
y=y*i;

for (j=0; j x[j]=x[j]/i;

menor=menor/i;
i=2;
}
else {i++; c=0; }

}while(i<=menor);

cout<<"\n\n El MCD es "<

getch();
}

Lee Entero

Si usas el clasico lee_entero, con cada entrada no valida se genera nuevas lineas de mensaje, dando asi un mal aspecto a nuestro programa. Esto se soluciona con el siguiente lee_entero. Si necesitas el lee_real solo cambia el tipo de dato y listo

int lee_entero(char *msj, int min, int max)
{
int y=wherey();
int num;
do{
gotoxy(1,y);printf("                            ");
gotoxy(1,y);printf("%s: ",msj);
scanf("%d",&num);
}while(num< min || num>max);
return num;
}

Numeros Aleatorios VB

Para generar numeros aleatorios en VB, se usa la funcion Rnd, esta funcion devuelve un valor entre 1 y 0.
numero=rnd

Si necesitamos valores entre un rango, por ejemplo una nota (0-20), quedaria asi
nota=rnd*20

pero si necesitamos valores un poco mas complicados . Ejemplo 17-53
usamos una formula sencilla.  Multiplicamos Rnd  por la diferencia de los numeros, y le sumamos el numero menor

numero=rnd*36 + 17 //valor aleatorio entre 17 y 53

Centrar cadenas

No te ha pasado?. Necesitas centrar un texto en pantalla, como un titulo, un mensaje o un menu, con las siguientes lineas podras resolver ese problema facilmente

void centrar(char *msj, int y) // recibimos el mensaje y la posicion
{
//si deseamos un posicion en especial enviamos la posicion, sino enviamos 0
int x;
x=40-strlen(msj)/2; //calculamos la posicion en x
if(y>0)
    gotoxy(x,y);
else
   gotoxy(x,wherey());
puts(msj);
}

void main()
{
char *cadena;
gets(cadena);
centrar(cadena,20);
centrar(cadena,0);
getch();
}

Menus para C++

Si haz programado a nivel basico, seguramente te has encontrado con el tipico menu, en el que se muestra las opciones, y se elige una. Posteo algunas formas de menu alternativas al tipico: "Ingrese la opcion: "

El primer menus es con un puntero hacia la opcion deseada y el segundo es resaltando al opcion
espero que les sirva . Puedes Descargar Menu, o verlo a continuacion



#include<conio.h>
#include<stdio.h>

#define TENT 13
#define TDER 77
#define TIZQ 75
#define TARR 72
#define TABA 80
#define TESC 27

char menu[3][15]={"Opcion 0","Opcion 1","Opcion 2"};

int Menu1(int x, int y, char tabla[][15],int no)
{
int i,pos,tecla;
textcolor(15);
for(i=0;i<no;i++)
{
gotoxy(x,y+i);cprintf("%s", tabla[i]);
}
x=x-2;
pos=0;
textcolor(10);
gotoxy(x,y);cprintf(" ");
do{
tecla=getch();
gotoxy(x,y+pos);cprintf(" ");
if(tecla==TARR)
if(pos==0)
pos=no-1;
else
pos--;
if(tecla==TABA)
if(pos==(no-1))
pos=0;
else
pos++;
gotoxy(x,y+pos);cprintf(" ");
}
while(!(tecla==TENT || tecla==TESC));

return pos;//retorna el numero de opcion de 1 a no
}//fin menu

/*..........FUNCION ELEGIR OPCION: RESALTADO.................*/
int Menu2(int x, int y, char tabla[][15], int N)
{
int i,tecla,C,pos=0;
textbackground(0);
C=4;
textcolor(15);
for(i=0;i<N;i++)
{
gotoxy(x,y+i);cprintf("%s", tabla[i]);
}

textbackground(C);
gotoxy(x,y);cprintf("%s", tabla[pos]);

do{
tecla=getch();
textbackground(0);
gotoxy(x,y+pos);cprintf("%s", tabla[pos]);
if(tecla==TARR)
if(pos==0)
pos=N-1;
else
pos--;
if(tecla==TABA)
if(pos==(N-1))
pos=0;
else
pos++;
textbackground(C);
gotoxy(x,y+pos);cprintf("%s", tabla[pos]);
}while(tecla!=TENT);

return pos;
}

void main()
{
int opc;
clrscr();
opc= Menu1(10,10,menu,3);
gotoxy(10,15);printf("%d: %s",opc,menu[opc]);

opc= Menu2(30,10,menu,3);
gotoxy(30,15);printf("%d: %s",opc,menu[opc]);
getch();
}

Cardex PEPS y Promedio

Les dejo aqui 2 de las tres formas de los cardex (esto es en contabilidad)

http://www.mediafire.com/?a7lpn70ljn2glb4
PEPS

http://www.mediafire.com/?2bopckcooo4t408
Promedio