TABLAS DE MULTIPLICAR

En este programa puedes conocer las tablas multiplicar, este programa fue diseñado en pascal y se utiliza la sentencia repeat.

descarga el programa dando click aqui.

CONVINANDO ESTRUCTURAS DE CONTROL

En este menu podras saber si un numero es par o no, saber si es negativo o positivo y saber el cadrado del numero.

desacarga el programa aqui

Estructura de control de repetición FOR

La sentencia FOR
En numerosas ocasiones se puede desear un bucle que se ejecute un número determinado de veces, y cuyo número se conozca por anticipado. Para aplicaciones de este tipo se utiliza la sentencia FOR.
La sentencia FOR requiere que conozcamos por anticipado el número de veces que se ejecutan las sentencias que se encuentran dentro del ciclo. El ciclo for se incremente automáticamente.
Sintaxis:
For variable := valor inicial to valor final do
Sentencia;
Ejemplos:
1.
For c := 1 to 5 do
Begin
Write (`aa´);
Write (`BB´)
End;
Al ejecutarse, visualiza:
AaBBaaBBaaBBaaBBaaBB
For Caracter := `A´ to `Z´ do
WriteLn (Caracter);
3. 4. 1. 1 Decremento del contador FOR (Downto)
El contador del ciclo se puede decrementar de uno en uno en lugar de incrementar. La sintaxis es la siguiente:
For variable := valor inicial downto valor final do
Sentencia;
Ejemplos:
For C := 5 downto 1 do
Begin
Write (`C´);
Writeln
End;
Lo anterior produce la siguiente salida:
5
4
3
2
1
También podemos encontrar ciclos FOR anidados:
For m := 1 to 10 do
begin
For n := 10 downto 2 do
WriteLn (m,n)
end;

Entrada deberá ser Estructura de control de repetición REPEAT

El ciclo repeat-until es un ciclo de 1 a n. Para ingresar al ciclo no hay condición por lo tanto las acciones que se encuentran dentro del ciclo se realizarán al menos una vez. Luego de la última acción (en este caso acción3) se evalúa la condición que se encuentra en la parte posterior de la estructura.El ciclo iterará hasta que se verifique la condición ("repeat-until" significa "repetir-hasta").

El ciclo repeat-until repite hasta que se cumpla la condición.

var

n: integer;

i:integer;

begin

write('Ingrese un valor: ');

readln(n);

i:=1;

repeat 9:

writeln(i);

i:=i+1;

until( i>n );

end.

ANDAMIO COGNITIVO (SENCIA DE SELECCION)

Descarga andamio cognitivo

MENUS

En este programa puedes escoger 4 opciones
1. calcular el area de un triangulo.
2. calcular el volumen de una esfera.
3. imprimir un mensaje de bienvenida.
4. salir.

se utilizo la sentencia CASE y PROCEDURE.

click aqui para descargar el programa

SENTENCIA CASE

Esta es una calculadora realizada con el programa FREE PASCAL.
NOTA:solo realiza las operaciones basicas(suma, resta, multiplicacion, divicion)

Da click aqui para descargar el programa