Blog C++ y VB

Uso de getch() y kbhit()

2011-03-26T19:59:00.000-05:00

Un pequeño y util ejemplo del uso de la funcion getch(), delay() y kbhit(). Se trata del controlar el movimiento
de un caracter en pantalla, finaliza si se presiona la tecla enter

kbhit(): nos indica si se presiono una tecla o no
get(): captura una tecla pulsada
delay(): retraso un tiempo

Descargar Aqui el ejemplo

Series mas comunes en C++

2011-03-26T13:50:00.000-05:00

Si eres principiantes en C o C++, seguramente te haz topado con los clasicos ejercicios de series y suma, en los que se aprende a usar las secuencias for, do-while. Aca les dejo las series mas comunes,

Sumas y Series Enteras

1. Fibonacci 0 -1 -1 -2 -3 -5 -8 -13

2. Cuadrados 1 -2 -4 -8 -16- 32- 48

3. Serie 1 1 -0 -3 -2 -5 -4 -7 -6

4. Primos 1 -2 -3- 5- 7- 11 -13

5. Cubos 1 -8 -27- 64- 125- 343

Sumas y Series con Fracciones

6. 1/1 + 1/2 + 1/3 + ... 1/n

7. 1/1 - 1/2 + 1/3 - ... 1/n

8. n/1 + n/2 + n/3 + .... n/n

Descargar Archivo CPP en: Megauplodad o Mediafire

Rompecabezas Deslizable C++

2011-03-25T19:30:00.000-05:00

El otro día encontré un rompecabezas deslizable mio, de varios años atras, es uno de dieciséis piezas, un juego bastante simple, que consiste en deslizar las piezas hasta su posición original. Aun así me anime a programarlo en C++. Algo decente el juego, usa las teclas de dirección para controlar las piezas, contiene 4 imagenes.

Descargar el juego aqui en Megaupload o Mediafire
Usa mis bibliotecas, si no las tienes, descargarlas aquí, desde Megaupload o Mediafire y pegarlas en la carpeta TC/include (el password es IncludeCpp)
Para poder jugarlo debes tener instalado el TurboC3

Fibonacci C++

2011-03-23T19:03:00.000-05:00

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();
}

Rational Rose Portable

2011-03-23T11:28:00.000-05:00

Para hacer mas variado el blog y expandirnos a nuevos temas, aca les dejo el link para el Rational Rose Portable

Descargar Ratioanl Rose

Cromos, Numeros aleatorios

2011-03-22T16:32:00.000-05:00

Se crea un vector, y se llena aleatoriamente, hasta que todos los valores del vector sean diferente de 0

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

void main()
{
int *vector;
int aleatorio[100];
int i,sw,n,aux,cant=0;

clrscr();

do{
printf("Cantidad: ");
scanf("%d",&n);
}while(n<1);

vector=new int[n];

for(i=0;i<n;i++)
vector[i]=0;

randomize();
do{
aux=random(n);//numero aleatorio

if(vector[aux]==0)//igualamos a uno la cantidad,
vector[aux]=1;

aleatorio[cant]=aux;//almacenamos el numero aleatorio generado
cant++;

sw=1;
for(i=0;i<n;i++)//recorremos el for
if(vector[i]==0)//evaluar la cantidad de cromos
sw=0;
}while(sw==0);

clrscr();
for(i=0;i<cant;i++)
printf("< %d > \n",aleatorio[i]);
getch();
}

Series C++

2011-03-21T19:58:00.000-05:00

Algunas series que siempre el profesor nos solicita..
Para ver un listado de series mas completo...haz clic aqui

1)Primera Serie: 1/1 +1/2 + 1/3 + ...+ 1/n

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

void main()
{
int n,aux=1;
float total=0.0;

clrscr();
printf("Ingrese numero: ");
scanf("%d",&n);

do{
total+=(float)1/aux;
aux++;
}while(aux<n);

printf("Suma de la serie %f",total);
getch();
}

2 Serie Dividir si es par, sino multplicar por tres +1

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

void main()
{
int num,cant=0;

clrscr();
do{
printf("Numero: ");
scanf("%d",&num);
}while(num<1);

do{
if(num%2==0)
num=num/2;
else
num=(num*3)+1;
cant++;
}while(num>1);

if(num==1)
printf("Valor final 1, cantidad de pasos %d",cant);
else
printf("Error");
getch();
}

Iniciales de Nombres

2011-03-21T18:50:00.001-05:00

#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();

}

Tabla de Multiplicar C++

2011-03-20T20:58:00.000-05:00

Un sencillo programa para mostrar la tabla de multiplicar

#include<conio.h>
#include<iostream.h>

void main()
{
int i,j;
//includecpp.blogspot.com
for(i=1;i<=10;i++)
{
cout<<"\n\nTabla del "<<i<<"\n";
for(j=1;j<=10;j++)
cout<<i<<" x "<<j<<" ="<<i*j<<"\n";

getch();
}
}

Tres en Raya C++, Version 2

2011-03-20T10:46:00.000-05:00

Para aquel que me pidio ayuda con el juego de Tres en Raya, sin matrices, con todos los datos y requisitos que me pediste

El vector se ordeno como se ve en la imagen,
cualquier duda, escribeme a yersicpp@gmail.com

Descargar Tren en Raya, sin matrices

TurboC 3, BorlandC y TurboC5

2011-03-19T20:33:00.000-05:00

Para aquellos que estan empezando con C, aca les dejo los links para los IDES

Descargar TurboC 3
Descargar TurboC 5

Cambiar vocales por letra que mas se repite

2011-03-19T11:52:00.000-05:00

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

Segunda Pregunta Comleta

2011-03-16T10:11:00.000-05:00

Aca les dejo, la segunda completa, con todos los reportes y con el error de lectura corregido

Descargar Segunda pregunta completa

Examen Progra II

2011-03-15T21:23:00.000-05:00

Para aquellos que van a dar examen de Progra II, aca les dejo el desarrollo del examen del ciclo pasado.. en VisualBasic

Descargar Primera Pregunta
Descargar Segunda Pregunta

SUERTE.... EN TU EXAMEN... QUE LA VAS A NECESITAR

Dejar tu comentario, no cuesta nada =P

Capturar Hora del Sistema

2011-03-01T20:20:00.000-05:00

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++

2011-03-01T01:54:00.001-05:00

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

2011-02-24T21:21:00.000-05:00

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

2011-02-23T17:15:00.000-05:00

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

Matriz C++

2011-02-23T11:48:00.000-05:00

Matriz en lista dinámica, con funciones de sumar, restar multiplicar, identidad

Descargar matriz de numeros complejos
Descargar matriz para numeros enteros

Matriz C++

2011-02-22T21:00:00.000-05:00

El tercer ejercicio del 1 Laboratorio de Progra I (con el profesor Valdivia), clase de matriz, casi todas las funciones implementadas

Descargar Matriz C++

Clase Fechas C++

2011-02-22T17:11:00.000-05:00

Les dejo la clase fecha, para aquellos que llevan curso con el profesor Valdivia
no esta completo, solo falta implementar sumadias y sumahoras...

#include<conio.h>
#include<stdio.h>
//www.includecpp.blogspot.com
class Fecha
{
int d,m,a;

public:
Fecha()
{
d=m=a=0;
}
Fecha(int,int,int);

int GetDia()
{return d;}
int GetAnio()
{return a;}
int GetMes()
{return m;}

void SetDia(int);
void SetMes(int);
void SetAnio(int);

void SumarDias(int);
void SumarHoras(int);
};

Fecha::Fecha(int x, int y, int z)
{
d=x;
m=y;
a=z;
}

void Fecha::SetDia(int aux)
{
d=aux;
}

void Fecha::SetMes(int aux)
{
m=aux;
}

void Fecha::SetAnio(int aux)
{
a=aux;
}

void Fecha::SumarDias(int dias)
{
//por implementar
}

void Fecha::SumarHoras(int horas)
{
//por implementar
}

void main()
{
Fecha A; //crear vacio
Fecha B(22,10,2011);//crear con datos

A.SetDia(24);
A.SetMes(12);
A.SetAnio(2012);

clrscr();
printf(" Dia: %d Mes: %d Año: %d",A.GetDia(),A.GetMes(),A.GetAnio());
printf(" Dia: %d Mes: %d Año: %d",B.GetDia(),B.GetMes(),B.GetAnio());
getch();
}

//no sean malos y dejen comentario

Matrices Visual Basic

2011-02-21T12:37:00.000-05:00

Uso de matrices en Visual Basic (Progra II clase del profesor Valdivia)

Sub main()
Dim matriz(3, 3) As Integer

Lectura matriz
presenta matriz

End Sub

Sub Lectura(matriz() As Integer)
Dim fil As Integer
Dim col As Integer

For fil = 0 To 2
For col = 0 To 2
matriz(fil, col) = InputBox("Ingrese numero [" & fil & "][" & col & "]")
Next
Next

End Sub

Sub presenta(matriz() As Integer)
Dim i As Integer
Dim j As Integer

Dim cad As String

For i = 0 To 2
For j = 0 To 2
cad = cad & matriz(i, j) & " "
Next
cad = cad & vbCrLf
Next
MsgBox (cad)

End Sub

Ejercicio de Vectores en VB

2011-02-21T12:09:00.001-05:00

Ejercicio de Vectores en Visual Basic, de la calse del profesro Valdivia

Sub main()
Dim nombres() As String
Dim total As Integer

Lectura nombres, total
Procesar nombres, total
Presenta nombres, total
End Sub
Sub Lectura(nombres() As String, total As Integer)
Dim cad As String
Dim sw As String

Do
cad = InputBox("Ingrese nombre: ")
Agregar nombres, total, cad

Do
sw = InputBox("Desea continuar?" & vbCrLf & "Si" & vbCrLf & "No")
Loop Until (sw = "si" Or sw = "no")

Loop Until sw = "no"
End Sub

Sub Agregar(nombres() As String, total As Integer, cad As String)

ReDim Preserve nombres(total)
nombres(total) = cad
total = total + 1
End Sub

Sub Presenta(nombres() As String, total As Integer)
Dim i As Integer
Dim cad As String

For i = 0 To total - 1
cad = cad & nombres(i) & vbCrLf
Next
MsgBox (cad)

End Sub

Sub Procesar(nombres() As String, total As Integer)
Dim i As Integer
Dim j As Integer
Dim aux As String

For i = 0 To total - 2
For j = i + 1 To total - 1
If nombres(i) > nombres(j) Then
aux = nombres(i)
nombres(i) = nombres(j)
nombres(j) = aux
End If
Next
Next

End Sub

Postal Garu C++

2011-02-19T11:17:00.000-05:00

Les dejo una postal en C++, en modo grafico, para San Valentin., con la imagen de Garu
Muy util si deseas aprender el modo grafico, se usa funciones basicas como setcolor(color de lineas y de texto), circle(dibuja circulo), setfillstyle (para el relleno), entre otras...

Ejemplo facil de entender

Descargar Postal C++

Centrar cadenas

2011-02-19T11:00:00.000-05:00

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();
}