Practicas pascal

Nombre: Claudio Arturo Todd
Materia: Edu. Tecnológica y computación
Profesor: Israel Tadeo Pérez
Grupo: 2204
No. Lista: 32
Ciclo escolar: 2009-2010.



/*Programa ejemplo numero1*/
#include
#include
void main()
{
clrscr();
gotoxy(37,24.5);
printf("Hola");
delay(5000);
}












#include
#include
void main()
{
charnombre[50];
int edad;
clrscr();
printf("Como te llamas?");
scanf("%s",nombre);
printf("Cuantos a¤os tienes?");
scanf("%i",& edad );
edad=edad*365;
gotoxy(5,10);
printf("%s,Hasvivido,%i,das",nombre,edad);
getch();
}





#include
#include
void main()
{
char nombre[50];
int pulsaciones;
clrscr();
printf("ESCRIBE TU NOMBRE");
scanf("%s",nombre);printf("ESCRIBE UN NUMERO DE MINUTOS");
scanf("%i",&pulsaciones);
pulsaciones=pulsaciones*70;
gotoxy(5,10);
printf("%s, LAS PULSACIONES DE TU CORAZON SON, %i",nombre,pulsaciones);
getch();
}#include
#include
void main()
{
char nombre[50];
int hora;
clrscr();
printf("Como te llamas??");
scanf("%s",nombre);
printf("Cuantas horas llevas en elestacionamiento??");
scanf("%i",&hora);
hora=hora*20;
gotoxy(5,10);
printf("%s, Debes de pagar, %i", nombre, hora);
getch();
}




#include
#include
void main ();
{
clrscr;
charempresa, cliente [50];
int precio;
printf ("empresa del auto:");
scanf ("%s", empresa);
printf ("cliente:");
scanf ("%s",cliente);
printf ("precio total del automovil:");
scanf ("%i",precio);
iva= precio*.16;
printf ("La empresa, "%s" le vende al cliente "%s" un automovil con el precio total de",empresa y cliente);
getch ();
}



#include
#include
void main ()
{int A,B;
clrscr;
printf ("Inserta el numero 1:");
scanf ("%i", A);
printf ("Inserta el numero 2:");
scanf ("%i", B);
if (A>B)
printf ("A es mayor");
else
printf ("B es mayor");...