Plandavis

Este es un pack de programas realizados en turbo pascal son 40 programas en total.

1. Escribir un programa en Pascal que calcule el área de un rectángulo:
   
   lado1 = 5 lado2 = 7
   área del rectángulo=lado1 * lado2
2. Escribir un programa en Pascal que calcule la velocidad de un proyectil que recorre 25 Km. en 6 minutos. Expresar el resultado en metros/segundo.
   
   Velocidad = espacio/tiempo
3. Escribir un programa en Pascal que evalúe la siguiente expresión:
   
   (a+6*c)/(b+2-a)+3*b a = 3,b = 2,c = 4
4. Escribir un programa en Pascal que calcula el equivalente en grados Fahrenheit o Celsius de las siguientes temperaturas.
   
   Temperatura 1 = 32º Fahrenheit
   Temperatura 2 = 10 º Celsius
   
   {Regla de 3: Celsius * 5 = (Fahrenheit – 32) 9}
5. Escribir un programa en Pascal que calcule el número de horas, minutos y segundos que hay en 5609 segundos.
6. Escribir un programa en Pascal que calcule el capital producido por un capital de Q. 300000, al cabo de un año depositado a un interés del 2.5%.
7. Un automóvil se mueve, partiendo del reposo, con una aceleración constante de 7 m/s2. Escribir un programa en Pascal que calcule:
   La velocidad instantánea al cabo de 3 segundos.
   La velocidad media durante los primeros 2 segundos del recorrido.
   
   velocidad instantánea = velocidad inicial + aceleración * tiempo
   velocidad media = (velocidad inicial + velocidad final)/2
8. Escribir un programa en Pascal que detecte si se han introducido en orden creciente tres números introducidos por el usuario.
9. Escribir un programa en Pascal que muestre un mensaje afirmativo si el número introducido es múltiplo de 3.
10. Escribir un programa en Pascal que detecte si un número leído desde el teclado es mayor o menor que 1000.
11. Escribir un programa en Pascal que dado un número del 1 a 7 escriba el correspondiente nombre del día de la semana.
12. Escribir un programa en Pascal que lea dos números desde el teclado y si el primero es mayor que el segundo intercambie sus valores.
13. Escribir un programa en Pascal que dada una calificación en valor alfabético (A,B,C,D ó E) indique su equivalente en valor numérico (10,9,8,7 o 6).
14. Escribir un programa en Pascal que una vez leída una hora en formato (horas, minutos, segundos) indique cual será el tiempo dentro de un segundo.
15. Escribir un programa en Pascal que realice un bucle con For y muestre en pantalla del 1 al 50.
16. Escribir un programa en Pascal que visualice en pantalla los números múltiplos de 5 comprendidos entre 100 y 500.
17. Escribir un programa en Pascal que sume los números comprendidos entre 200 y 400.
18. Escribir un programa en Pascal que genere la tabla de multiplicar de un número introducido por el teclado.
19. Escribir un programa en Pascal que realice la pregunta ¿Desea continuar S/N? y que no deje de hacerla hasta que el usuario teclee N.
20. Escribir un programa que pida un número y si el que se introduce por el teclado es menor de 5000 que vuelva a solicitarlo.
21. Escribir un programa en Pascal que calcule el factorial de un número.
22. Escribir un programa en Pascal que detecte si un número es primo o no. Un número es primo si sólo es divisible por sí mismo y por la unidad.
    
    Ejemplo: 2,3,4,7,11,17,19 son números primos
    i. 9 no es número primo, es divisible por 1, 9, 3
    El algoritmo para resolver este problema pasa por dividir sucesivamente el número estudiado por 2,3,4, etc., hasta el propio número.
23. Escribir un programa en Pascal que lea 10 datos desde el teclado y sume sólo aquellos que sean negativos.
24. Escribir un programa en Pascal que rellene un array con los números enteros comprendidos entre 1 y 25.
25. Escribir un programa en Pascal que rellene un array con cinco números enteros consecutivos y haga una copia de ese array en otro.
26. Escribir un programa en Pascal que rellene un array con los veinte primeros números pares y calcule su suma.
27. Escribir un programa en Pascal que tras asignar los números, 23, 45, 68, 99, 10, 15 y 4 a un array, determine la posición del array en la que se encuentra el máximo valor.
28. Escribir un programa en Pascal que determine la posición de la siguiente matriz en la que se encuentra el valor máximo.
    
    40 -99 68
    22 98 66
    25 93 89
29. Escribir un programa en Pascal que sume, independientemente, los elementos positivos y negativos de la siguiente matriz:
    
    -12 23 32
    45 -56 -10
    25 78 89
30. Escribir un programa en Pascal que almacene en un array los números primos comprendidos entre 1 y 100.
31. Escribir un programa que lea 5 valores de temperatura, y escriba el número de veces que estuvo bajo 0º.
32. Escribir un programa en Pascal que almacene en un array de registros los nombres de los alumnos, sus notas parciales y finales. Hallar la nota media y mostrar un mensaje de APTO si el alumno supera o iguala la calificación de 5 o NO APTO si no lo alcanza. Hacerlo para un número de 5 alumnos.
33. Escribir un programa en Pascal que almacene en un array de registros las características de cada persona: nombre, sexo, edad, peso, color de pelo, color de piel, color de ojos, nacionalidad y teléfono.
34. Escribir un programa que convierta un número de segundos en su equivalente en minutos y segundos.
35. Escribir un programa en Pascal que transforme números entre 0 y 999 a números romanos.
36. Escribir un programa en Pascal que genere 6 números aleatorios con un rango
    de entre 1 y 50, al igual que se hace en la lotería.
37. Escriba un programa PASCAL que produzca las siguiente salida utilizando ciclos:
    
    *
    ***
    *****
    *******
    *********
    ***********
    *************
    *
38. Escribir un programa que llene la pantalla de “x” utilizando ciclos.
39. Hacer un programa que acepte como entrada, 3 datos, dia, mes (escrito) y año, y la salida sera con tres numeros, por ejemplo:
    18 Agosto 2002 La salida sera 18 08 2002
40. Modificar el programa anterior para que dada una letra dibuje el siguiente pino, suponiendo que la letra dada sea h

Link:
http://freakshare.com/files/k61xr3wa/40-Porgramas-en-Pascal.rar.html