Códigos Fuente de Pascal/Turbo Pascal

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”.

Código de un programa que desarrolle, en el que se ingresa un numero de 4 cifras y este lo pasa a texto, (ejemplo 551 = quinientos cincuenta y uno), tiene un solo problema que cuando se pone un numero de decena mayor a cero y unidad igual a 0 queda una Y de mas en el texto, (ejemplo: 530= quinientos treinta y), pero el cual es fácil de solucionar.

Saludos Herni.

Introduccir dos numeros uno menor a 4 digitos y uno mayor, y que el programa pueda decirme si algun digito del primer numero se encuentra en el de mayor cantidad....

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

En este código se guardan los datos de los clientes para una Agencia Toursven. Este programa se maneja con ficheros, se puede ver el código rutinas para guardar datos, modificar, eliminar y consultar datos. Además, tiene una rutina sencilla para validar fecha con trystrtodate. Quizás no sea el mejor código pero espero que ha alguien le sea de ayuda y lo comparto. Gracias a este sitio web pude realizarlo.

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

Puede ser Complilador en Free Pascal o Turbo Pascal

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

Este pequeño programa es un "Machete", el cual te calcula la superficies de las siguientes figuras: Cuadrado, triángulo, rectángulo, paralelogramo, trapecio, rombo, romboide, círculo. También calcula el perímetro de: Triángulo, cuadrado, rectángulo, paralelogramo, trapecio isósceles, rombo, romboide, polígonos regulares, circunferencia, arco de circunferencia. Además, calcula pitágoras. Puede descifrar un cateto o la hipotenusa. También cuenta con una tabla de multiplicación, la cual multiplica un numero hasta otro numero que usted ingrese. Y para finalizar, cuenta con una pequeña calculadora, que contiene: suma, resta, multiplicación, división [Solo dos numeros], potenciación, y radicación.

Programa realizado en Turbo Pascal 7.0