UNIDAD 1: PASCAL ELEMENTOS BASICOS

TEMA 8: PROGRAMACION PASCAL

La estructura de un programa en pascal es;

PROGRAM NOMPROG;

CONST

VAR

BEGIN

INSTRUCCIONES;

END.

EJEMPLO Prog1.pas


program prog1;

var

area,base,altura :real;

begin

(* area de captura *)

write('Dame Base :');

readln(base);

write('Dame Altura:');

readln(altura);

(* area de operaciones *)

area := base * altura / 2;

(* area de despliegue *)

writeln('El Area es =',area:0:2);

readln;

end.

Corrida:

image233.jpg

Reglas para escribir un programa en PASCAL :

a) Se sigue la estructura del programa, escrita al principio del tema.

b) Primero declarar la variables.

c) El cuerpo de instrucciones del programa debera encerrarse entre el begin —- end.

d) Todas las instrucciones ejecutables terminan con punto y coma.

e) Los comentarios se ponen encerrados entre (* comentario *)

f La declaracion de variables ocupa la primera posicion.

g) Se utiliza una instruccion llamada write() o writeln() para desplegar mensajes u otros elementos en el dispositivo de salida standar(pantalla).

h.- Se utiliza una instruccion llamada read() o readln() para capturar datos desde el dispositivo de entrada standar (teclado).

i.- Se usa una instruccion readln; al final para detener la pantalla hasta que el usuario pulse la tecla “any key” para continuar o el programa responde tan aprisa que no se alcanza a ver y se regresa al editor.

Ya creadas y cargadas las variables normales se efectuan los procesos u operaciones normales con ellas.

Este programa se debera crear usando el editor del turbo pascal y grabarlo como prog1.pas en el folder de su preferencia, para ejecutarlo usar la opcion RUN del propio editor.

RECORDAR nunca grabarlo con un nombre que contenga mas de 8 letras o caracteres, recordar que estamos hablando de los tiempos de msdos

INSTRUCCION WRITE() y WRITELN()

Es una de las mas poderosas herramientas de despliegue de datos que posee el lenguaje.

Su formato completo es:

WRITE(lista de parametros);

* Donde lista de parametros pueden ser:

a).- Mensaje o texto

b).- variables

c).- Combinacion de los dos

ejemplos;

write('el area es')'

write('el area es=',area);

write('base=',base,'altura='altura');

Ademas cada argumento ya sea texto o variable puede incluir el sguiente modificador;

Texto o variable:tamanocampo:tamanodecimal

Ejemplo

Write('mama':10); ←- se desplegara centrado en los 10 primeros espacios de los 80 espacios que tiene una pantalla de msdos.

Si el texto es mayor que el tamano asignado, TP ignora el tamano asignado y despliega todo el texto.

Ejemplo

Pi:real;

Begin

Pi:=3.1416;

Write(pi:10:2);

End.

Estamos pidiendo desplegar todo el numero en 10 espacios, en este caso TP centra y redondea al entero mas cercano, es decir la slida es 3.14.

La diferencia entre WRITE y WRITELN, es que el segundo incluye un cambio de renglon al final del despligue.

RECORDAR que en este compilador, cuando esten capturando una string y luego un dato numerico con read(), el compilador se va a saltar la captura del dato numerico, esto es un bug del compilador, para resolver este problema, solo agregar uno o varios readln; sin nada despues del read de captura de string o mejor aun solo usar readln() para captura.

INSTRUCCION READ() Y READLN();

Esta instruccion permite que el dato entrado desde el teclado sea capturado y almacenado en la variable correspondiente su formato completo es:

read(lista de variables);

ejemplo

read(base,altura,nombre,edad);

Aqui se pretende capturar cuatro variables en una sola pasada.

Lo mas sensato es usar un read(variable) por cada variable que se ocupe capturar en el programa.

Recordar tambien que en el caso de captura de reales es preferible agregar un cero (0) para decimales que no lo contengan, es decir no capturar .234 sino 0.234

La diferencia entre read() y readln(), es que el primero deja el cursor en el renglon de captura y readln() lo avanza un renglon.

Tareas PROGRAMACION PASCAL

CONSTRUIR 15 PROGRAMAS CUALESQUIERA DE LOS EJEMPLOS QUE ESTAN EL TEMA DEL MODELO DE SOLUCION.

 


 


Driven by DokuWiki

Politica de Privacidad