Los códigos más visitados de Pascal/Turbo Pascal

Este programa es para hacer una factura de una tienda en incluye subtotal, total e iva

Código del popular juego de la serpiente en el que podemos personalizar el nivel de dificultad y la cantidad de números a perseguir. Programado en el modo gráfico del lenguaje.

Este programa es para resolver ecuaciones de segundo grado en pascal

calculadora básica (+, - , *, / , %) en Pascal, esto es de ayuda ya que muchos necesitan códigos básico de apoyo por eso lo comparto . saludos

El siguiente programa permite ingresar :
-numero de folio del alumno
-nombre del alumno
-materias
-calificaciones
-dar el promedio final
-decir si el alumno esta APROBADO O REPROBADO

Programa que determina si un número N es primo. (Un número primo sólo puede ser divisible por el mismo y la unidad...compilado en Borland Pascal para Windows Versión 7.0

Este código de Turbo Pascal sirve para poder sumar,restar,multiplicar y dividir fracciones.

Este código fue utilizado de manera didáctica a nivel bachillerato para comprender el funcionamiento de CASE-OF, durante los procedimientos pueden alterar el código con la forma correspondiente para sacar el area y perimetro de cualquiera de las figuras.

Convierte de una base 10 a una base de 2 a 16

Puede ser Complilador en Free Pascal o Turbo Pascal

Código que realiza la ordenación de un array constante por el método de ordenación Quicksort, devolviéndolo ordenado.

Programa que calcula cuantos y cuales puntos de coordenadas enteras existen dentro de un triangulo del que se conocen las coordenadas de sus vértices.

Este programa esta creado para administradores de Whatsapp…

Objetivo
Mostrar por horarios, correspondientes al día especificado, la cantidad de veces que los usuarios de Whatsapp han participado (enviado mensajes), datos representados en una tabla con formato “.htm”.

Funcionamiento
El Programa lee un archivo de texto creado por la aplicación "Whatsapp", cuando el usuario usa la acción "Enviar chat por correo". Ese archivo resultante al día de hoy (2017) está en formato de texto, es asignado un nombre de archivo que inicia con "Chat de Whatsapp con....txt" y se guarda en la carpeta ".Shared" del dispositivo, o bien en el correo electrónico seleccionado.

Nota
Gracias a los emuladores de MS-DOS, funciona en un dispositivo con Sistema Android, de tal manera que la forma correcta de ejecutarlo; es alojando el programa y “montar la unidad C:\” en la carpeta “.Shared” de “Whatsapp”.

Programa para graficar funciones trigonométricas. Realizado en Turbo Pascal 7.0

Juego del "tetris" usando solo la unidad crt de Pascal.
Compilado con "Free Pascal" Version 1.0.8.

Código que permite ver el signo zodiacal con sus respectivas características según el mes y el día introducido por el usuario. Creado en Turbo Pascal 7.

Implementación del juego del ahorcado en Pascal. Incluye menús e interficie de juego.

Simulación de juego del bingo donde se muestra, en modo gráfico, el tablero de números. Se controla la partida con cualquier posible resultado.

El programa sirve para indicar al usuario un elemento cualquiera de la tabla periódica.

Este es un programa que simula al WINDOWS 95 desde que inicia hasta que se apaga, está en modo DOS y 320x200; además se puede arrastrar las ventanas desde la barra de titulo... hasta tiene un papel tapiz q se puede editar, un calendario y otras cosas.

Contiene funciones de Ingenería Economica.

Código totalmente orientado a objetos. Ha sido diseñado utilizando la librería de Borland, Turbo Vision. El compilador usado fue Turbo Pascal 7.0.

Programa que calcula la fecha del domingo de pascua de N año en particular. La Fecha de Pascua corresponde al primer domingo después de la primera Luna Llena que sigue el equinoccio de primavera y se calcula con las siguientes expresiones:
A = AÑO MODULO 19
B = AÑO MODULO 4
C = AÑO MODULO 7
D = ( 19 * A + 24 ) MODULO 30
E = ( 2 * B + 4 * C + 6 * D + 5 ) MODULO 7
N = ( 22 + D + E )

Este es el código para calcular el determinante de una matriz cuadrada.

Juego del ahorcado con la implementación del ratón.

Programa que determina si un año es Bisiesto. Un año es bisiesto si es múltiplo de 4 (1988), excepto los múltiplos de 100 que no son bisiestos salvo que a su vez también sean múltiplos de 400
(1800 no es bisiesto, 2000 si es bisiesto)...compilado en Borland Pascal para Windows Version 7.0

Código que convierte un numero romano a decimal.
Creado con Turbo Pascal 7.0.

Código de aplicación completa y funcional de control de stock para negocio de ferreteria u otros en modo texto y en modo gráfico (con biblioteca para uso del mouse y simulando botones y objetos 3D tipo windows) realizada en Turbo Pascal 6

Juego de la serpiente con varios niveles de juego.
Probado con Free Pascal 1.0.10

Utilidad para mostrar la tabla de verdad de una función lógica.

Código que simula el juego del Bingo utilizando el modo gráfico.
Desarrollado en Turbo Pascal 7.0