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();
}
Mostrando entradas con la etiqueta Otros. Mostrar todas las entradas
Mostrando entradas con la etiqueta Otros. Mostrar todas las entradas
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();
}
#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
#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
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();
}
#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; j
}
do {
for(j=0; j
c=1;
break; } }
if (c==0){
y=y*i;
for (j=0; j
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;
}
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
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();
}
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: "
#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();
}
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
http://www.mediafire.com/?a7lpn70ljn2glb4
PEPS
http://www.mediafire.com/?2bopckcooo4t408
Promedio
Suscribirse a:
Entradas (Atom)