"Sintaxis de algunas instrucciones en pascal"

"Instrcción case"

Es una instrucción de desición múltiple, donde el compilador prueba o busca el valor contenido en una variable contra una lista de constantes ints o chars, cuando la computadora encuentra el valor de igualdad entre variable y constante, entonces ejecuta el grupo de instrucciones asociados a un default, aunque este último es opcional.

EJEMPLO:

program prog3;

uses crt;

var

letra:char;

begin

clrscr;

gotoxy(20,5);write('dame una letra :');

readln(letra);

(* empieza case *)

case letra of

'a': begin gotoxy(50,5); write('aguila'); readln; end;

'b','B': begin gotoxy(50,5); write('becerro'); readln; end;

'c': begin gotoxy(50,5); write('caballo ');write('camello'); readln; end;

else begin gotoxy(50,5);write('no hay');readln; end

end;

end.

"Instrcción repeat"

Su diferencia básica con el ciclo while esque la preba de condición eshecha al finalizar

el ciclo, es decir las instrucciones se ejecutan cuando menos de una vez porque primero

ejecuta las instrucciones al final evalua la condicón.

EJEMPLO:

program prog6;

uses crt;

var

x:integer;

begin

clrscr;

x:=1;

REPEAT

BEGIN

gotoxy(10,4+x);

write(x,' CONEJITO BLANCO HIMALAYA');

x:=x+1;

END

UNTIL x = 5;

readln;

end.

"Instucción for"

Este ciclo uno de los mas usados para repetir unan secuencia de instrucciones,sobre

todo cuando seconoce la cantidad exacta de veces que se quiere que se ejecute una

instrcción simple o compuesta.

EJEMPLO:

program prog4;

uses crt;

var

x:integer;

begin

clrscr;

for x:= 1 to 5 do

begin

gotoxy(10,4+x);write(x,' tecnologico');

end;

readln;

end.

"Instrucción while"

Este ciclo es el cuerpo de instrucciones se ejecuta mientras termina una condición

permanezca como verdadera en el momento que la condición se convierte en falsa, el

ciclo termina.
 

EJEMPLO:

program prog5;

uses crt;

var

x:integer;

begin

clrscr;

x:=1;

while x <= 5 do

begin

gotoxy(10,4+x);write(x,' pato');

x:=x+1;

end;

readln;

end.