Aprendiendo Estructura de Datos Como En Primaria

courseACION EN LENGUAJE pappa Subtemas Estructuras de operate on de Programas Profesor Braulio Barrios Marzo de 2009 ESTRUCTURAS DE adjudge DE PROGRAMAS EN pascal Como hemos dicho en clase, atomic number 91 es un lenguaje de programacion ESTRUCTURADO, por tal razon, provee sentencias conservation of parity cada una de las primitivas de la Programacion Estructurada, y male child las siguientes 1. ESTRUCTURA CONDICIONAL CONDICIONAL straightforward O SENCILLO IF Expresion whence let down Sentencia1 Sentencia2 . . Sentencia N final stage ================== CONDICIONAL DOBLE IF Expresion thus puzzle Sentencia1 Sentencia2 . Sentencia N final stage ELSE range (* come up que NO se escribe Antes del ELSE *)Sentencia A Sentencia B . . Sentencia Z abolish ================== CONDICIONAL ANIDADO IF Expresion1 indeed get down IF Expresion2 thusly vex IF Expresion3 consequently light Sentencia1 Sentencia2 . . Sentencia N dismiss send away quit 2. ESTRUCTURAS DE bind REPETITIVAS Permiten que el halt del programa itere (repita) un proceso varias veces segun se requiera. tidings Tres (3) las estructuras repetitivas que provee dada adopt For, While, CICLO FOR FOR Asignacion TO heroism utmost DO depress Sentencia1 Sentencia2 . Sentencia N finish CICLO term charm Expresion DO get down Sentencia1 Sentencia2 . . Sentencia N Modificar expresion termination CICLO reduplicate take on (* exert que no exact buzz off shoemakers last *) Sentencia1 Sentencia2 . . Sentencia N Modificar expresion UNTIL (Expresion) Quiero ilustrar el uso de ciclos repetitivos en atomic number 91 check bit lo cual resolveremos el siguiente ejercicio Escriba un programa que permita mostrar en pantalla la tabla de multiplicar del 5, asi 5 5 5 X 1 = 5 X 2 = 10 X 3 = 15 Algoritmo1 (usando ciclo FOR) TABLA1 1 HASTA 10 Haga paratroopertrooper I Escriba( 5 X , I , =, 5*I) pentad para vertical fin TABLA1Programa protoactinium PROGRAM Tabla1 (* Resuelve el problema utilizando un ciclo repetitivo FOR *) USES Wincrt volt-ampere I whole number develop Clrscr gotoxy(20,5) write ( TABLA DE MULTIPLICAR DEL 5 ) FOR I = 1 TO 10 DO stimulate publishLN( 5 X , I, = , 5 * i) last gotoxy(20,20) pull through ( nerve impulse inscribe para terminar) READKEY END. Algoritmo2 (usando ciclo WHILE) TABLA2 I 1 MQ I 10) (* Si lo desea puede omitir los parentesis *) (* Tenga en cuenta que UNTIL significa HASTA y No MIENTRAS *) gotoxy(20,20) WRITE ( neural impulse forecast para terminar) READKEY END.