Pascal impress

República Bolivariana de Venezuela
Universidad Pedagógica Experimental
Instituto Pedagógico Barquisimeto
Dr. “Luis Beltran Prieto Figueroa”
LENGUAJE DE PROGRAMACION
Estudiante: Helen Pérez

¿Qué es Pascal?
Pascal es un lenguaje de programación de alto nivel
que fue diseñado de forma estructurada y sencilla con
el propósito de facilitar el aprendizaje a aquellos
usuarios que se inician en el mundo de la
programación. Además dicho lenguaje hace que los
programas sean más factibles en cuanto a la lectura y
escritura.

Pascal fue desarrollado por el profesor suizo
Niklaus Wirth entre los años 1968 y 1969 y publicado en
1970 como un elemento de aprendizaje.
Historia

Program {Palabra que indica cómo se llama el nombre
USES CRT
CONST {}
Begin {Marcan el principio}
ClrScr; {Limpia la pantalla}
Write {Orden que permite escribir un texto en pantalla}
Readln{Orden que permite leer un texto en pantalla}
End. {Marcan el final}
Su Estructura

Su Estructura
Pascal
PROGRAM Nombre;
{ Cabecera }
{ Declaraciones }
BEGIN
{ Sentencias }
END.
Pseudocódigo
Algoritmo Nombre
{ Cabecera }
{ Declaraciones }
Inicio
{ Sentencias }
Fin.

● La Cabecera:
El programa solo lleva el nombre del programa.
Ejemplo:
Program Nombre;
● Declaraciones:
Aquí se le indica al compilador todos los indentificadores
y unidades que
utilizará nuestro programa.
● Sentencias:
Aquí se escriben todo el código de instrucciones que
realizará nuestro
programa. Todas las instrucciones van escritas entre las
reservadas begin y
end.

Tipos de Datos
Pseudocodigo Pascal Descripción
Entero Integer
Numero Comprendido entre
-32768 hasta 32768
Real Real Es un Numero Real
Texto String
Cadena de Caracteres
(Numeros, Letras, Simbolos)
Logico Boolean Variable logica. Puede ser
Verdadero o Falso

Variables y Constantes
Las constantes son valores que mantienen su
posición fija, es decir, que no varían, muy
diferente a las variables ya que estas pueden
almacenar diferentes valores y cambiar.

Operadores aritméticos
Los operadores aritméticos que son más que un
símbolo especial los cuales son:
+ SUMA
- RESTA
* MULTIPLICACION
/ DIVISION
Div DIVISION ENTERA
Mod MODULO O RESIDUO

Operador Descripción
= Igual a
> Mayor que
< Menor que
>= Mayor o igual que
<= Menor o igual que
<> Distinto de
Operadores de relación

Ejercicios Resueltos
● Escribir un programa en Pascal que sume dos números:
PROGRAM SUMA;
VAR
a,b,c:INTEGER;
BEGIN {Empezamos con lo básico, un programa que escribe la
suma de 2 numeros en pantalla}
a:=4;
b:=3;
{Se asigna un valor cualquiera a las variables "a" y "b"}
c:=a+b;
WRITE (c); {Muestra en pantalla el valor de la suma}
END.

Escribir un programa en Pascal que calcule el área de un rectángulo:
PROGRAM AREA;
USES CRT;
VAR lado1,lado2:INTEGER;
VAR area:INTEGER;
BEGIN
{Damos valores para las variables}
lado1:=3;
lado2:=4;
area:=lado1*lado2; {Calculamos el area}
ClrScr;
WRITE ('AREA DEL RECTANGULO: ');
WRITE (area); {Lo mostramos en pantalla}
END.

Realice un algoritmo que dado un monto en bolívares,
se necesita saber cuál es su valor al hacer el cambio a dólares oficiales.
Program ConvertidoDeMoneda;
Uses crt;
Const
D=6.30;
Var
Bolívar,Dólar:real;
Begin
Clrscr
Writeln(‘Convertidor de Moneda Bolivar/Dolares!’);
Write(‘Introduzca su monto en Bolivares’);
Readln(Bolivar);
Dólar:=Bolívar*6.30;
Writeln(‘La cantidad en Dolares oficiales es de:’,Dólar:3:2);
Readkey
End.

Realice un algoritmo que obtenga el porcentaje de hormigas transformadas de una
colonia,
dados el número de hormigas transformadas
y el número total de hormigas que hay en la colonia.
Program hormigas;
Uses crt;
Var
H,tr,r:real
Begin
Clrscr
Writeln(‘Porcentaje de Hormigas Transformadas de una Colonia!);
Write(‘ingrese el Número total de hormigas de la colonia´);
Readln(h);
Write(‘cantidad de hormigas trasformadas’);
Readln(tr);
R:=(h*tr)/100;
Write(‘El Porcentaje de hormigas Transformadas es:’,tr:0:2, ‘% De un total de
‘,h:0:2,’ hormigas’);
End.

Realice un algoritmo que permita introducir un valor en centímetros
y devuelva su equivalente en pulgadas. Sabiendo que 1 pulgada= 2,54
centímetros.
Program convertidor;
Uses crt;
Const a=2.54;
Var
Pulgadas: integer;
Centímetros:real;
Begin
Clrscr;
Write(‘introduzca la cantidad en pulgadas:’);
Readln(pulgadas);
Centímetros:=a*pulgadas;
Writeln(‘El equivalente a centímetros es :’,centimetros:2:1);
Readkey
End.

Pascal impress

Más contenido relacionado

La actualidad más candente (20)

Similar a Pascal impress (20)

Último (20)

Pascal impress