Pascal

Como un aporte a la educación
Edición 2009
Estructura básica d un programa pascal

Ejemplo de un programa que muestra en pantalla la palabra BIENVENIDO.
Program saludo;
Uses crt;
BeginClrscr;
Write(‘BIENVENIDO’);
Readkey;
End.
Ejemplo No.2
Program saludo;
Uses crt;
Begin
Clrscr;
Writeln(‘BIENVENIDO’);
Readkey;
End.

Ejercicio No.
1. Realice un programa que muestre los díasde la semana de las dos formas según
los ejemplos anteriores.
2. Realice un programa que muestre los meses del año de las dos formas según los
ejemplos anteriores.

Página No.1

Como un aportea la educación
Edición 2009
Uso de variables enteras y la lectura de datos.
Program sumadedosnumeros;
Uses crt;
Var
a,b,c:integer;
begin
clrscr;
writeln(‘ingrese un numero’); read(a);writeln(‘ingrese otro numero’); read(b);
c:=a+b;
writeln(‘la suma es:’,c);
readkey
end.
Ejercicios
1. Realice un programa para cada operación aritmética básica y que permita
ingresar tres números.2. Realice un programa que permita ingresar cuatro notas y calcular el promedio.
Uso de dos tipos diferentes de variables

Program sumadedosnumeros;
Uses crt;
Var
a,b,c:integer;
nombre:string;begin
clrscr;
writeln(‘ingrese el nombre de la materia’); readln(nombre);
writeln(‘ingrese un numero’); read(a);
writeln(‘ingrese otro numero’); read(b);
c:=a+b;
writeln(‘la suma es:’,c);readkey
end.
Ejercicios
1. Realice un programa que calcule el sueldo de una persona en base a las horas
trabajadas y una tarifa de pago por hora.
2. Calcular el área de un rectángulo
3. Ingrese sunombre, la materia, cuatro notas, calcule el promedio de las notas
ingresadas.
4. Ingresar el valor de la venta para tres meses y calcular el total de la venta trimestral, y
el promedio de ventadurante el trimestre.

Página No.2

Como un aporte a la educación
Edición 2009
5. Dada una longitud en Millas calcular sus equivalentes en Kilo metros, Metros,
Centímetros, pulgadas y Pies....