Códigos Fuente de Pascal/Turbo Pascal

Mostrando del 61 al 70 de 132 registros
sin imagen de perfil

Fibonacci


Pascal/Turbo Pascal

estrellaestrellaestrellaestrellaestrella(1)
Publicado el 26 de Junio del 2006 por Angel Reynaldo Paredes Ortiz
7.748 visualizaciones desde el 26 de Junio del 2006
Código que calcula el n-ésimo Fibonacci, para todos los N entre 0 y 32767 (un Integer), está programado para compilar en Free Pascal.
sin imagen de perfil

Permutaciones


Pascal/Turbo Pascal

estrellaestrellaestrellaestrellaestrella(1)
Publicado el 24 de Junio del 2006 por Frank Rafael
6.646 visualizaciones desde el 24 de Junio del 2006
Algoritmo generador de permutaciones.
Creado con TP 7.0.
sin imagen de perfil

Radar


Pascal/Turbo Pascal

Publicado el 5 de Junio del 2006 por Frank Rafael
6.807 visualizaciones desde el 5 de Junio del 2006
Código que simula un radar.
Desarrollado en Turbo Pascal 7.0
sin imagen de perfil

Fibonacci


Pascal/Turbo Pascal

Publicado el 12 de Mayo del 2006 por Frank Rafael
9.021 visualizaciones desde el 12 de Mayo del 2006
Código que halla los números de la secuencia de Fibonacci hasta el termino 174 y los escribe en el fichero fibonum.txt.
En la secuencia de Fibonacci el término Fn es igual a la suma de los dos precedentes siendo F0=0 y F1=1.
Desarrollado en Turbo Pascal 7.0.
sin imagen de perfil

Factores Primos


Pascal/Turbo Pascal

estrellaestrellaestrellaestrellaestrella(1)
Publicado el 12 de Mayo del 2006 por Frank Rafael
7.559 visualizaciones desde el 12 de Mayo del 2006
Código que muestra la descomposición en factores primos de un entero dado por el usuario.
Desarrollado en Turbo Pascal 7.0.
sin imagen de perfil

Fecha y hora del sistema


Pascal/Turbo Pascal

estrellaestrellaestrellaestrellaestrella(1)
Publicado el 26 de Abril del 2006 por Frank Rafael
9.411 visualizaciones desde el 26 de Abril del 2006
Código que muestra en tamaño muy grande la hora del sistema.
Creado con Turbo Pascal 7.0
sin imagen de perfil

Capicúa


Pascal/Turbo Pascal

Publicado el 18 de Abril del 2006 por Frank Rafael
6.533 visualizaciones desde el 18 de Abril del 2006
Un capicúa es un número que se lee igual de izquierda a derecha que de derecha a izquierda. Por ejemplo, 2882 es un capicúa de 4 cifras y 49194 es un capicúa de 5 cifras.
Hay pares de capicúa de 4 cifras cuya suma es un capicúa de 5 cifras. Este código, encuentra estos pares de capicúas de 4 cifras que cumplen lo descrito anteriormente (los escribe en el fichero de texto capicua.txt).
Creado con Turbo Pascal 7.0
sin imagen de perfil

Resto de una división


Pascal/Turbo Pascal

Publicado el 18 de Abril del 2006 por Frank Rafael
5.332 visualizaciones desde el 18 de Abril del 2006
Código que permite saber el resto de dividir un número de hasta 250 (1*10^250) cifras por uno menor que 2*10^10.
Ejemplo: 1234787868564578989687568565765 al ser dividido por 4567 deja resto 1733.
Creado con Turbo Pascal 7.0
sin imagen de perfil

Numeros Primos


Pascal/Turbo Pascal

estrellaestrellaestrellaestrellaestrella(2)
Publicado el 19 de Marzo del 2006 por Pablo Papes
14.295 visualizaciones desde el 19 de Marzo del 2006
Código que devuelve los números primos comprendidos entre dos valores introducidos por el usuario.
Utiliza la función L (numerosprimos.5u.com)
Realizado en Turbo Pascal 7
sin imagen de perfil

La criba de Erastótenes


Pascal/Turbo Pascal

Publicado el 15 de Marzo del 2006 por Frank Rafael
5.763 visualizaciones desde el 15 de Marzo del 2006
Este un algoritmo conocido desde la antigüedad, para determinar todos los números primos desde 2 hasta un cierto valor n.
El algoritmo está basado en "marcar" todos los números que son múltiplos de algún otro menor. Al final, los números que "hayan sobrevivido a tal marcado" por supuesto, son primos.

Creado con Turbo Pascal 7.0.