pseudocodigos CBTis172

65
CENTRO DE BACHILLERATO TECNOLOGICO INDUSTRIAL Y DE SERVICIOS NO. 172 PSEUDOCODIGOS Y DIAGRAMAS DE FLUJO MAESTRA: ISC. ESPERANZA PESCADOR ESPITIA INFORMATICA APLICACIÓN DE LOS PRINCIPIOS DE PROGRAMACION EN LA SOLUCION DE PROBLEMAS Alumnos: CESAR BANDA ELIAS JOSE FEDERICO CALERO GUERRERO SEMESTRE: 4 GRUPO: C Junio-2010

description

Ejercicios de pseudocodigos y diagrama de flujos CBTis 172

Transcript of pseudocodigos CBTis172

Page 1: pseudocodigos CBTis172

CENTRO DE BACHILLERATO TECNOLOGICO INDUSTRIAL Y DE

SERVICIOS NO. 172

PSEUDOCODIGOS Y DIAGRAMAS DE FLUJO

MAESTRA: ISC. ESPERANZA PESCADOR ESPITIA

INFORMATICA

APLICACIÓN DE LOS PRINCIPIOS DE PROGRAMACION

EN LA SOLUCION DE PROBLEMAS

Alumnos:

CESAR BANDA ELIAS

JOSE FEDERICO CALERO GUERRERO

SEMESTRE: 4 GRUPO: C

Junio-2010

Page 2: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

PANTALLA DE SALIDA

La dueña de la cafetería del CBTis 172 desea implementar un sistema con nueva tecnología,

brindando un monitor con información de las opciones del menú del día. Los datos de la pantalla

principal son los siguientes:

PSEUDOCODIGO 1.- [Cafetería CBTis 172] 2.- [Declarar variables] Opc: Char NoControl: String 3.- [Imprimir fecha] write(‘Fecha:’ date) 4.- [Imprimir menú de opción] write(‘’) write(‘MENU’) write(‘ 1 Desayuno’) write(‘ 2 Almuerzo’) write(‘3 Comida’) write(‘4 Salir’) write(‘’) write(‘NoControl’) read(‘NoControl’) write(‘Opción’) read(‘Opc’) 5.- [Imprimir opción] write(Opc) 6.- [Fin] @

Page 3: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

DIAGRAMA DE FLUJOD

INICIO

‘MENU’

‘1 Desayuno’‘2 Almuerzo’‘3 Comida’

‘4 Salir’‘ ’

‘Fecha:’ date

‘NoControl’

NoControl

‘Opcion’

Opc

Opc

Fin

Page 4: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

PANTALLA DE SALIDA

En el taller de matemáticas de x escuela necesita un algoritmo para calcular el área de figuras

geométricas, usando las formulas para lados iguales:

PSEUDOCODIGO 1.- [Área Figuras Geométricas] 2.- [Declarar variables] Base, Altura, Lado, DMayor, DMenor, AreaT, AreaC, AreaR; real 3.- [Calcular área del triangulo] write(‘Área del triangulo’) write(‘’) 4.- [Pedir datos del triangulo] write(‘La base del TRIANGULO es:’) read(Base) write(‘La altura de TRIANGULO es:’) read(Altura) 5.- [Calcular el área] AreaT←Base*Altura/2 6.-.- [Imprimir datos] write(‘El área del TRIANGULO es:’ AreaT) 7.- [Calcular el área del cuadrado] write(‘Área del cuadrado’) write(‘’) 8.- [Pedir datos del cuadrado] write(‘El lado del CUADRADO es:’) read(Lado) 9.- [Calcular área] AreaC←Lado*Lado 10.- [Imprimir datos] write(‘El Área del CUADRADO es:’ AreaC)

Page 5: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

11.- [Calcular área del rombo] Write(‘Área del rombo’) write(‘’) 12.- [Pedir datos] write(‘La diagonal mayor del ROMBO es:’) read(DMayor) write(‘la diagonal menor del ROMBO es:’) read(DMenor) 13.- [Calcular el área del rombo] AreaR←DMayor*DMenor/2 14.- [Imprimir datos] write(‘El área del ROMBO es:’ AreaR) 15.- [Fin] @

Page 6: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

DIAGRAMA DE FLUJOD

INICIO

‘Área del triangulo’

‘La base del TRIANGULO es:’

Base

‘La altura del TRIANGULO es:’

Altura

‘El área del TRIANGULO es:’

AreaT

FIN‘Área del

CUADRADO’

‘El lado del CUDRADO es:’

Lado

AreaT←Base*Altura/2

‘El área del cuadrado es:’

AreaC

‘Área del rombo’

1

1

‘La diagonal mayor del

ROMBO es:’

DMayor

‘La diagonal menor del

ROMBO es:’

DMenor

‘El área del ROMBO es:’

AreaR

AreaR←Dmayor*Dmenor/2

AreaC←Lado*Lado

Page 7: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

PANTALLA DE SALIDA

En la tiendita de la esquina se desea imprimir la compra de los productos para un determinado

cliente el ticket de salida es:

PSEUDOCODIGO

1.- [Ticket la tiendita] 2.- [Declarar variables]

Articulo1, Articulo2, Articulo3: String NA1, NA2, NA3, Cant1, Cant2, Cant3, Precio1. Precio2, Precio3, Importe1, Importe2, I Importe3, Total, Pago, Cambio: real 3.- [Pedir datos] write(‘Articulo1’) read(NA1) write(‘Cantidad1’) read(Cant1) write(‘Precio1’) read(Precio1) write(‘Articulo2’) read(NA2) write(‘Cantidad2’) read(Cant2) write(‘Precio2’) read(Precio2) write(‘Articulo3’) read(NA3) write(‘Cantidad3’) read(Cant3) write(‘Precio3’) read(Precio3) 4.- [Calcular importe] Importe1←Cant1*Precio1 Importe2←Cant2*Precio2 Importe3←Cant3*Precio3 5.- [Calcular total] Total←Importe1+Importe2+Importe3 6.- [Pedir datos] write(‘Pago’)

Page 8: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

read(Pago) 7.- [Calcular cambio] Cambio←Pago-Total 8.- [Imprimir datos] write(‘La Tiendita’) Write (‘’) write(‘NA’, ‘Nombre’, ’Cantidad’, ‘Precio’, ‘Importe’) write(NA1,Nombre1, Cant1, Precio1, Importe1,) write(NA2,Nombre2, Cant2, Precio2, Importe2,) write(NA3,Nombre3, Cant3, Precio3, Importe3,) write(‘’) write(‘El total es:’ Total) write(‘’) write(‘Su cambio es:’ Cambio) 9.- [Fin] @

Page 9: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

DIAGRAMA DE FLUJOD

‘La Tiendita’‘’

‘NA’, ‘Nombre’, ‘Cantidad’, ‘Precio’, ‘Importe’NA1, Nombre1, Cant1, Precio1. Importe1NA2, Nombre2, Cant2, Precio2. Importe2NA3, Nombre3, Cant3, Precio3. Importe3

‘’‘El total es:’ Total

‘’‘Su cambio es:’ Cambio

1

Importe1←Cant1*Precio1

INICIO

‘Articulo1’

NA1

‘Cantidad1’

Cant1

‘Precio1’

Precio1

‘Articulo2’

NA2

‘Cantidad2’

Cant2

‘Precio2’

Precio2

‘Articulo3’

NA3

‘Cantidad3’

Cant3

‘Precio3’

Precio3

1

Importe2←Cant2*Precio2

Cambio←Pago-Total

Importe3←Cant3*Precio3

‘Pago’

Pago

2

2

Total← Importe1+Importe2+Importe3

FIN

Page 10: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

PANTALLA DE SALIDA

Calcular la suma de tres números:

PSEUDOCODIGO 1.- [Calcular la suma de tres números] 2.- [Declarar variables] Num1, Num2, Num3, Suma; real 3.- [Pedir datos] write(‘Ingrese los números’) write(‘Num1:’) read(Num1) write(‘Num2:’) read(Num2) write(‘Num3:’) read(Num3) 4.- [Calcular suma] Suma←Num1+Num2+Num3 5.- [Imprimir datos] write(‘La suma es:’ Suma) 6.- [Fin] @

Page 11: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

DIAGRAMA DE FLUJOD

INICIO

‘Ingrese los números’

‘Num1:’

Num1

‘Num2:’

Num2

‘Num3:’

Num3

Suma← Num1+Num2+Num3

‘La suma es:’Suma

FIN

Page 12: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

PANTALLA DE SALIDA

Serie 1+ 1

2+

1

3+1

4

PSEUDOCODIGO 1.- [Serie] 2.- [Variables] Suma, Valor1, Valor2, Valor3; real 3.- [Calcular valor] Valor1←1/2 Valor2←1/3 Valor3←1/4 Suma←1+Valor1+Valor2+Valor3 4.- [Imprimir datos] write(‘Serie’)

write(‘1+ 1

2+

1

3+

1

4’)

write(‘La suma es:’ Suma) 5.- [Fin] @

Page 13: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

DIAGRAMA DE FLUJOD

INICIO

Valor1←1/2

Valor2←1/3

Valor3←1/3

Suma←1+Valor1+Valor2+Valor3

‘Serie’

‘1+½+1/3+1/4’

‘La suma es:’ Suma

FIN

Page 14: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

PANTALLA DE SALIDA

Factorial

PSEUDOCODIGO 1.- [Factorial] 2.- [Declarar variables] N1, N2, N3, N4, Fac; real 3.- [Calcular factorial] N=5 N1←N-1 N2←N1-1 N3←N2-1 N4←N3-1 Fac←N*N1*N2*N3*N4 4.- [Imprimir datos] write(‘El factorial de 5 es:’) write(‘5:’ Fac) 5.- [Fin] @

Page 15: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

DIAGRAMA DE FLUJOD

INICIO

N=5

N1←N-1

N2←N1-1

N3←N2-1

‘El factorial de 5 es:’

‘5:’ Fac

FIN

N4←N3-1

Fac←N*N1*N2*N3*N4

Page 16: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

PANTALLA DE SALIDA

Para base 4 calcular su exponente de 4

PSEUDOCODIGO 1.- [Exponente] 2.- [Declarar variables] N1, N2, N3, N3, Expo; real 3.- [Calcular datos] N=4 N1←2^2 N2←2^2 N3←2^2 Expo←N*N1*N2*N3 4.- [Imprimir datos] write(‘Base = 4’) write(‘Su exponente es:’ Expo) 5.- [Fin] @

Page 17: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

DIAGRAMA DE FLUJOD

INICIO

N=4

N1←2^2

N2←2^2

N3←2^2

‘Base=4’

‘Su exponente es::’ Expo

FIN

Expo←N*N1*N2*N3

Page 18: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

PANTALLA DE SALIDA Boleta

PSEUDOCODIGO 1.- [Boleta de calificaciones] 2.- [Declarar variables] Cal1, Cal2, Cal3, Promedio; real Matricula, Facultad, Alumno, Area, Asig1, Asig2, Asig3; String 3.- [Elaborar boleta] write(‘CENTRO DE BACHILLERATO TECNOLOGICO INDUSTRIAL Y DE SERVICIOS 172’) write(‘BOLETA DE CALIFICACIONES’) 4.- [Pedir datos] write(‘MATRICULA’, ‘FACULTAD’, ‘ALUMNO’, ‘AREA’) read(Matricula, Facultad, Alumno, Area) write(‘Asignatura’, ‘Clave’) read(Asig1, Asig2, Asig3) write(‘Cal1’, ‘Cal2’, ‘Cal3’) read(Cal1, Cal2, Cal3) 5.- [Calcular promedio] Promedio← (Cal1+Cal2+Cal3)/3 6.- [Imprimir datos] write(‘Promedio:’ Promedio) 7.- [Fin] @

Page 19: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

DIAGRAMA DE FLUJOD

INICIO

‘CENTRO DE BACHILLERATO TECNOLOGICO INDUSTRIAL Y DE

SERVICIOS 172’

‘BOLETA DE CALIFICACIONES’

‘MATRICULA’, ‘FACULTAD’, ‘ALUMNO’, ‘AREA’

Matricula, Facultad, Alumno, Area

‘Asignatura’, ‘Clave’

Asig1, Asig2, Asig3

‘Cal1’, ‘Cal2’, ‘Cal3’

Cal1, Cal2, Cal3

Promedio← (Cal1+Cal2+Cal3)/3

‘Promedio:’ Promedio

FIN

Page 20: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

PANTALLA DE SALIDA

Promedio

En el grupo de 4°C de informática, se desea obtener en el promedio de calificación de los alumnos

por grupo, mas indicar si es hombre o si es mujer, si es hombre contar cuantos son, y que

promedio obtuvieron de la misma manera que para las mujeres, el grupo está conformado por dos

alumnos.

PSEUDOCODIGO 1.- [Promedio] 2.- [Declarar variables] Prom1, Prom2, PG, Cal1, Cal2, Cal3, Cal4, Cal5, Cal6; real H, M: Charc 3.- [Pedir datos] write(‘Total de alumnos: 2’) write(‘Sexo’) read(H) 4[If] If H<>M Then write(‘Calificacion1:’) read(Cal1) write(‘Calificacion2:’) read(Cal2) write(‘Calificacion3:’) read(Cal3) Prom1←(Cal1+Cal2+Cal3)/3 write(‘Promedio de la mujer es:’ Prom1) Else write(‘Calificacion1:’) read(‘Cal4’) write(‘Calificacion2:’) read(‘Cal5’) write(‘Calificacion3:’) read(‘Cal6’)

Page 21: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

Prom2←(Cal4+Cal5+Cal6)/3 write(‘Promedio del Hombre es:’ Prom2) 5.- [Calcular promedio] PG←(Prom1+Prom2)/2 6.- [Imprimir datos] write(‘Promedio general:’ PG) 7.- [Fin] @

Page 22: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

DIAGRAMA DE FLUJOD

INICIO

‘Total de alumnos: 2’

‘Sexo’

H

If H<>M

‘Calificacion1:’

Cal1

‘Calificacion2:’

Cal2

‘Calificacion3:’

Cal3

Prom1← (Cal1+Cal2+Cal3)/3

‘Promedio de la mujer es:’ Prom1

‘Calificacion1:’

Cal4

‘Calificacion2:’

Cal5

‘Calificacion3:’

Cal6

Prom2← (Cal4+Cal5+Cal6)/3

‘Promedio de la hombre es:’ Prom2

PG← (Prom1+Prom2)/2

‘Promedio general:’ PG

FIN

Page 23: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

PANTALLA DE SALIDA

Salario.

PSEUDOCODIGO 1.- [Salario] 2.- [Declarar variables] NTrabajador; String NDias, Grupo; Int Jornada, SBase, Stotal; Real 3.- [Pedir datos] write(‘Nombre del trabajador:’) read(NTrabajador) write(‘Dias trabajados:’) read(NDias) Jornada← 56.5 SBase← Jornada*NDias write(‘Salario Base:’ SBase) write(‘Grupo:’) read(Grupo) 4.- [If] If Grupo==1 Then Stotal← SBase+(SBase*.1) Else Stotal← SBase+(SBase*.5) 5.- [Imprimir datos] write(‘Salario total:’ Stotal) 6.- [Fin] @

Page 24: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

DIAGRAMA DE FLUJOD

INICIO

FIN

‘Nombre del trabajador:’

NTrabajador

‘Días trabajados:’

NDías

Jornada←56.5

‘Jornada:’ Jornada

Sbase← Jornada*NDías

‘Salario Base:’ SBase

‘Grupo:’

Grupo

Grupo==1

Stotal← Sbase+(Sbase*.1)Stotal← Sbase+(Sbase*.5)

‘Salario total:’ Stotal

Page 25: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

PANTALLA DE SALIDA

Indice de contaminación.

PSEUDOCODIGO 1.- [Indice de contaminación] 2.- [Declarar variables] Indice; Real 3.- [Pedir datos] write(‘Informe de Control Ambiental’) write(‘Lectura de Indice de Contaminacion Ambiental’) read(Indice) 4.- [If] If Indice<=20 Then write(‘Indice aceptado’) Else If Indice<=30 Then write(‘Suspension de 2 dias, multa de 3500’) Else If Indice<=40 Then write(‘Suspension de 4 dias, multa de 5000’) Else If Indice<=50 Then write(‘Cancelacion, multa de 10000’) Esle write(‘Suspension de 6 dias, multa de 7500’) 5.- [Fin] @

Page 26: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

DIAGRAMA DE FLUJOD

INICIO

‘Informe de Control Ambiental’

‘Lectura de Indice de Contaminacion

Ambiental’

Indice

Indice<=20

Indice<=30

Indice<=40

Indice<=50

‘Indice aceptado’

‘Suspension de 2 dias, multa de

3500’

‘Suspension de 4 dias, multa de

5000’

‘Cancelacion, multa de 10000’

‘Suspension de 6 dias, multa de

7500’

FIN

Page 27: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

PANTALLA DE SALIDA

Tres números.

PSEUDOCODIGO 1.- [Tres números] 2.- [Declarar variables] N1, N2, N3; real 3.- [Pedir datos] write(‘Escribe tres números’) read(N1) read(N2) read(N3) 4.-[Establecer ciclo] If (N1>0) and (N2>0) and (N3>0) Then If N1>N2 Then If N2>N3 Then write(‘El mayor es:’N1) write(‘El menor es:’N3) Else If N3>N1 Then write(‘El mayor es:’N3) write(‘El menor es:’N2) Else If N1<N3 Then If N2>N3 Then write(‘El mayor es:’N3) write(‘El menor es:’N1) Else If N2>N3 Then write(‘El mayor es:’N2) write(‘El menor es:’N1) Else write(‘El mayor es:’N3)

Page 28: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

write(‘El menor es:’N2) 5.- [Fin] @

Page 29: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

DIAGRAMA DE FLUJOD

If N1>N2

INICIO

‘Excribe tres números’

N1

N2

N3

If (N1>0) and (N2>0) and (N3>0)

If N2>N3

‘El mayor es:’ N1

‘El menor es:’N3

If N3>N1

‘El mayor es:’ N3

‘El menor es:’ N2

If N2<N3

‘El mayor es:’ N3

‘El menor es:’ N1

If N1<N3

If N2>N3

‘El mayor es:’ N2

‘El menor es:’ N1

‘El mayor es:’ N3

‘El menor es:’ N2

FIN

Page 30: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

PANTALLA DE SALIDA

Cartelera.

PSEUDOCODIGO 1.- [Cartelera] 2.- [Declaración de variables] Opción: String[2] Precio: real 3.- [Impresión de datos] write(‘Cartelera’) write(‘’) write(‘1 Furia de titanes’) write(‘2 Alicia en el país de las maravillas’) write(‘3 Legión de ángeles’) write(‘4 Salir’) 4.- [Elegir opción] read(Opción) 5.- [Caso] Case Opción:’1’ write(‘Precio’) read(Precio) Opción:’2’ write(‘Precio’) read(Precio) Opción:’3’ write(‘Precio’) read(Precio) Opción:’4’ write(‘Salir’) 6.- [Fin] @

Page 31: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

DIAGRAMA DE FLUJOD

‘Cartelera’‘’

‘1 Furia de titanes’‘2 Alicia en el país de las

maravillas’‘3 Legión de ángeles’

‘4 Salir’

INICIO

Opción

Case

Opción: ‘1’

‘Precio’

Precio

Opción: ‘2’

‘Precio’

Precio

Opción: ‘3’

‘Precio’

Precio

Opción: ‘4’

‘Salir’

FIN

Page 32: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

PANTALLA DE SALIDA

Calcular áreas.

PSEUDOCODIGO 1.- [Calcular áreas] 2.- [Declaración de variables] Opcion: String [2] Base, Altura, Lado, DMayor, DMenor, AreaT, AreaC, AreaR; real 3.- [Impresión de datos] write(‘Áreas’) write(‘’) write(‘1 Area del Triangulo’) write(‘2 Area del Cuadrado’) write(‘3 Area del Rombo’) write(‘4 Salir’) 4.- [Elegir opción] read(Opcion) 5.- [Caso] Case Opcion:’1’ write(‘La base del TRIANGULO es:’) read(Base) write(‘La altura de TRIANGULO es:’) read(Altura) AreaT←Base*Altura/2 write(‘El área del TRIANGULO es:’ AreaT)

Opcion:’2’ write(‘El lado del CUADRADO es:’) read(Lado) AreaC←Lado*Lado write(‘El Area del CUADRADO es:’ AreaC)

Opcion:’3’ write(‘La diagonal mayor del ROMBO es:’)

Page 33: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

read(DMayor) write(‘La diagonal menor del ROMBO es:’) read(DMenor) AreaR←DMayor*DMenor/2 write(‘El área del ROMBO es:’ AreaR) Opcion:’4’ write(‘Fin’) 6.- [Fin] @

Page 34: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

DIAGRAMA DE FLUJOD

‘Áreas’‘’

‘1 Area del Triangulo’‘2 Area del Cuadrado’

‘3 Area del Rombo’‘4 Salir’

INICIO

Opción

Case

Opción: ‘1’ Opción: ‘2’ Opción: ‘3’ Opción: ‘4’

‘Área del triangulo’

‘La base del TRIANGULO es:’

Base

‘La altura del TRIANGULO es:’

Altura

‘El área del TRIANGULO es:’

AreaT

‘Área del CUADRADO’

‘El lado del CUDRADO es:’

Lado

AreaT←Base*Altura/2

‘El área del cuadrado es:’

AreaC

‘Área del rombo’

‘La diagonal mayor del ROMBO es:’

DMayor

‘La diagonal menor del ROMBO es:’

DMenor

‘El área del ROMBO es:’

AreaR

AreaR←Dmayor*Dmenor/2

AreaC←Lado*Lado

FIN

Page 35: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

PANTALLA DE SALIDA

Factura gasolinera.

PSEUDOCODIGO 1.- [Factura gasolinera] 2.- [Declarar variables] Nombre, Apellidos, Direccion, RFC; String Cant; entero Sub, IVA, Total; real 3.- [Pedir datos] write(‘Nombre’) read(Nombre) write(‘Apellidos’) read(Apellidos) write(‘Dirección’) read(Direccion) write(‘Registro Federal del Contribuyente’) read(RFC) write(‘Cantidad’) read(Cant) write(‘1 Magna’) write(‘2 Premium’) write(‘3 Diesel’) 4.- [Elegir opción] read(Opcion) 5.- [Caso] Case Opcion:’1’ Sub←Cant*.84/8.13

Page 36: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

IVA←Cant*.16/8.13 Total←Sub+IVA Opcion:’2’ Sub←Cant*.84/8.9 IVA←Cant*.16/8.9 Total←Sub+IVA Opcion:’3’ Sub←Cant*.84/8.7 IVA←Cant*.16/8.7 Total←Sub+IVA 6.- [Impresión de datos] write(‘Factura cliente’) write(‘’) write(‘Nombre:’ Nombre) write(‘Apellidos:’ Apellidos) write(‘Direccion:’ Direccion) write(‘RFC:’RFC) write(‘’) write(‘Subtotal:’ Sub) write(‘IVA:’IVA) write(‘Total:’ Total) 7.- [Fin] @

Page 37: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

DIAGRAMA DE FLUJOD

‘1 Magna’‘2 Premium’

‘3 Diesel’

INICIO

Opción

Case

Opción: ‘1’ Opción: ‘2’ Opción: ‘3’

‘Nombre’

Nombre

‘Apellidos’

Apellidos

‘Direccion’

Direccion

‘Registro Fedreal del Contribuyente’

RFC

‘Cantidad’

Cant

Sub← Cant*.84/8.13

IVA← Cant*.16/8.13

Total← Sub+IVA

Sub← Cant*.84/8.9

IVA← Cant*.16/8.9

Total← Sub+IVA

Sub← Cant*.84/8.7

IVA← Cant*.16/8.7

Total← Sub+IVA

‘Factura cliente’‘’

‘Nombre:’ Nombre‘Apellidos:’ Apellidos‘Direccion:’ Direccion

‘RFC:’ RFC‘’

‘Subtotal:’ Sub‘IVA’: IVA

‘Total:’ Total

FIN

Page 38: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

PANTALLA DE SALIDA

Factura gasolina. (Examen)

En una gasolinera se busca facturar el ticket de la compra de litros por gasolina o diesel; para la

gasolina el precio es de $7.8 por litros y de diesel de $6.25 por litros. El gerente desea entregar al

cliente los datos de la factura y el total de la venta mas el IVA que es del 16%.

PSEUDOCODIGO 1.- [Ticket gasolinera] 2.- [Declarar variables] CantGas, CantDiesel, Total, Iva, PrecioGas, PrecioDiesel; real 3.- [Pedir datos] write(‘Cantidad de litros de gasolina:’) read(CantGas) write(‘Cantidad de litros de diesel:’) read(CantDiesel) 4.- [Calcular precios] PrecioGas←CantGas*7.8 PrecioDiesel←CantDiesel*6.25 Total←PrecioGas+PrecioDiesel Iva←Total+ (Total*.16) 5.- [Imprimir datos] write(‘Factura Gasolina’) write(‘’) write(‘Gasolina:’ PrecioGas) write(‘Diesel:’ PrecioDiesel) write(‘IVA:’ Iva) write(‘El total de su compra es:’ Total) 6.- [Fin] @

Page 39: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

DIAGRAMA DE FLUJOD

INICIO

PrecioGas← CantGas*7.8

PrecioDiesel← CantDiesel*6.25

Total← PrecioGas+PrecioDiesel

‘Factura cliente’‘’

‘Gasolina:’ PrecioGas‘Diesel’ PrecioDiesel

‘IVA’: IVA‘Total:’ Total

FIN

‘Cantidad de litros de gasolina:’

CantGas

‘Cantidad de litros de diesel:’

CantDiesel

IVA← Total+(Total*.16)

Page 40: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

PANTALLA DE SALIDA PANTALLA DE SALIDA

Estructuras de repetición.

Suma de números enteros.

PSEUDOCODIGO 1.- [Suma de números enteros] 2.- [Declarar variables] N1, N2, N3, N4, N5, Suma; entero 3.- [Pedir datos] write(‘N1:’) read(N1) write(‘N2:’) read(N2) write(‘N3:’) read(N3) write(‘N4:’) read(N4) write(‘N5:’) read(N5) 4.- [Calcular suma] Suma←N1+N2+N3+N4+N5 5.- [Imprimir datos] write(‘La suma es:’ Suma) 6.- [Fin] @

PSEUDOCODIGO 1.- [Suma de números enteros] 2.- [Declarar variables] Suma, Numero, N, I; entero 3.- [Pedir datos] write(‘Valor de N:’) read(N) 4.- [Establecer ciclo de repetición] For I==1to I<=N 5.- [Pedir el numero] write(‘Numero’) read(Numero) 6.- [Calcular la suma] Suma←Suma+Numero 7.- [Imprimir] write(‘La suma es:’ Suma) 8.- [Fin] @

Page 41: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

DIAGRAMA DE FLUJOD

INICIO

‘N1:’

N1

‘N2:’

N2

‘N3:’

N3

‘N4:’

N4

‘N5:’

N5

Suma← N1+N2+N3+N4+N5

‘La suma es:’Suma

FIN

DIAGRAMA DE FLUJOD

INICIO

‘Valor de N:’

N

I==1

to

I<=N ‘Numero’

Numero

Suma← Suma+Numero

‘La suma es:’ Suma

FIN

Page 42: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

PANTALLA DE SALIDA

Promedio.

En un grupo de N alumnos de la materia de trigonometría se desea calcular el promedio de la

calificación del primer parcial.

PSEUDOCODIGO 1.- [Promedio] 2.- [Declarar variables] N, Calif, suma, I; enteros Prom; real 3.- [Pedir datos] write(‘Total de alumnos:’) read(N) Suma←0 4.- [Establecer ciclo de repetición] For I==1 to I<=N 5.- [Pedir calificaciones] write(‘Calificación del alumno:’) read(Calif) 6.- [Calcular suma] Suma←Suma+Calif 7.- [Calcular promedio] Prom←Suma/N 8.- [Imprimir datos] write(‘Total de alumnos:’ N) write(‘’) write(‘Promedio:’ Prom) 9.- [Fin] @

Page 43: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

DIAGRAMA DE FLUJOD

INICIO

‘Total de alumnos:’

N

I==1

to

I<=N‘Calificacion del

alumno:’

Calif

Suma← Suma+Calif

‘Total de alumnos:’N

‘’‘Promedio:’ Prom

FIN

Suma← 0

Prom← Suma/N

Page 44: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

PANTALLA DE SALIDA

1+ 1

2+

1

3+1

4+⋯

1

𝑛

PSEUDOCODIGO 1.- [Suma de fracciones] 2.- [Declarar variables] N; entero Suma; real 3.- [Pedir datos] write(‘Ingrese el número faltante de: 1/’) read(N) Suma←1 Num←1/Suma 4.- [Establecer ciclo de repetición] For I==2 to I<=N 5.- [Calcular suma] Suma←Suma+Num 6.- [Imprimir datos] write(‘El resultado es:’ Suma) 7.- [Fin] @

Page 45: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

DIAGRAMA DE FLUJOD

INICIO

‘Ingrese el numero faltante de: 1/’

N

I==2

to

I<=N

Suma← Suma+Num

‘El resultado es:’Suma

FIN

Suma← 0

Num← 1/Suma

Page 46: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

PANTALLA DE SALIDA

Tabla N.

PSEUDOCODIGO 1.- [Tabla] 2.- [Declarar variables] N, Num, I; entero 3.- [Pedir datos] write(‘Escribe el numero a multiplicar:’) read(N) Num←0 4.- [Establecer ciclo de repetición] For I==1 To I<=10 5.- [Calcular multiplicación] Num←N*I 6.- [Imprimir datos] write(‘El resultado es:’ Num) 7.- [Fin] @

Page 47: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

DIAGRAMA DE FLUJOD

INICIO

‘Escribe el numero a multiplicar:’

N

I==1

to

I<=10

Num← N*I

‘El resultado es:’ Num

FIN

Num← 0

Page 48: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

PANTALLA DE SALIDA

1 + 2

2+3

3+

4

4+⋯

𝑛

𝑛

PSEUDOCODIGO 1.- [Suma de fracciones] 2.- [Declaración de variables] N, I, Suma, Num; entero 3.- [Pedir datos] write(‘Valores de N:’) read(N) Suma←1 4.- [Establecer ciclo de repetición]

For I==2 to I<=N 5.- [Calcular suma]

Suma←Suma + I/I 6.- [Imprimir datos] write(‘El resultado es:’ Suma) 7.- [Fin] @

Page 49: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

DIAGRAMA DE FLUJOD

INICIO

‘Valores de N:’

N

I==2

to

I<=N

Suma← Suma+I/I

‘El resultado es:’ Suma

FIN

Suma← 1

Page 50: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

PANTALLA DE SALIDA

1-1

22+

1

32−

1

42+⋯

1

𝑛2

PSEUDOCODIGO 1.- [Fracciones] 2.- [Declarar variables] Suma; real 3.- [Pedir datos] write(‘El valor de N:’) read(N) Suma←1 Signos←-1 4.- [Establecer ciclo de repetición] For I==2 to N>=2 5.-[Calcular suma] Suma←Suma+Signo*1/I^2 Suma←Suma+((Signos*Signos)*1/I^2) 6.- [Imprimir datos] write(‘La suma es:’ Suma) 7.- [Fin] @

Page 51: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

DIAGRAMA DE FLUJOD

INICIO

‘El valor de N:’

N

I==2

to

N>=2

Suma← Suma+Signo*1/I^2

‘La suma es:’ Suma

FIN

Suma← 1

Signos← -1

Suma← Suma+(Signos*Signos)*1/I^2

Page 52: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

PANTALLA DE SALIDA

Tienda.

PSEUDOCODIGO 1.- [Tiendita] 2.- [Declarar variables] Resp; Char NomPRod; String[15] Cant; Int Precio, Importe, Suma; Real 3.- [Pedir datos] write(‘Desea hacer alguna compra: S o N’) read(Resp) 4.- [Inicializar variable] Suma←0 5.- [Establecer ciclo de repetición] While Resp==’S’ or Resp== Char(83) 6.- [Pedir datos del producto] write(‘Nombre del producto:’) read(NomProd) write(‘Precio:’) read(Precio) write(‘Cantidad:’) read(Cant) 7.- [Calcular importe] Importe←Precio*Cant Suma←Suma+Importe 8.- [Volver a pedir producto] write(‘Desea comprar otra compra:’) read(Resp) 9.- [Imprimir] write(‘El total de su compra es:’ Suma) 10.- [Fin] @

Page 53: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

DIAGRAMA DE FLUJO

INICIO

‘Desea hacer alguna compra: S o N’

Resp

Suma← 0

While Resp== ‘S’ or Resp==Char(83)

‘Nombre del producto’

NomProd

‘Precio’

Precio

‘Cantidad’

Cantidad

Importe← Precio*Cant

Suma← Suma+Importe

‘Desea hacer otra compra:’

Resp

‘El total de su compra es:’ Suma

FIN

Page 54: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

PANTALLA DE SALIDA

La tiendita. (Examen)

PSEUDOCODIGO 1.- [Tiendita] 2.- [Declarar variables] Resp: Char NomProd: String [15] Cant: Int Precio, Importe, Suma; Real 3.- [Pedir datos] write(‘Desea hacer alguna compra S o N’) read(Resp) 4.- [Inicializar variables] Suma←0 5.- [Establecer ciclo] While Resp==’S’ or Resp==’N’ or Resp<>’S’ and Resp<>’N’ 6.- [Establecer ciclo] While Resp<>’S’ or Resp<>’N’ 7.- [Error] write(‘Error’) write(‘Desea hacer una compra S o N’) read(Resp) 8.- [Establecer ciclo] While Resp==’S’ 9.- [Datos producto] write(‘Nombre Producto’) read(NomProd) write(‘Precio’) read(Precio) write(‘Cantidad’) read(Cant) 10.- [Calcular importe] Importe← Precio*Cantidad Suma← Suma + Importe 11.- [Pregunta]

Page 55: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

write(‘Desea hacer alguna otra compra:’) read(Resp) 12.- [Establecer ciclo] While Resp==’N’ 13.- [Mensaje] write(‘Gracias por su compra’) 14.- [Imprimir] write(‘El total de su compra es:’ Suma) 15.- [Fin] @

Page 56: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

DIAGRAMA DE FLUJOD

INICIO

‘Desea hacer alguna compra: S o N’

Resp

Suma← 0

While Resp== ‘S’ or Resp== ‘N’ or Resp<> ‘S’

and Resp<>’N’

‘Nombre del producto’

NomProd

‘Precio’

Precio

‘Cantidad’

Cantidad

Importe← Precio*Cant

Suma← Suma+Importe

‘Desea hacer alguna otra compra:’

Resp

‘El total de su compra es:’ Suma

FIN

While Resp<> ‘S’ or Resp<> ‘N’

‘Error’

‘Desea hacer alguna compra: S o N’

Resp

While ResP== ‘S’

1

1

2

2

While Resp== ‘N’

‘Gracias por su compra’

Page 57: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

PANTALLA DE SALIDA Boleta de calificaciones. (Examen)

PSEUDOCODIGO 1.- [Boleta de calificaciones] 2.- [Declarar variables] Calif1, Calif2, Calif3; Int

Matricula, Alumno, Facultad, Area, ClaveAsig1, Clave Asig2, ClaveAsig3, Asig1, Asig2, Asig3; Charc

3.- [Pedir datos] write(‘Ingrese el numero de matricula’) read(Matricula) write(‘Ingrese el nombre del alumno’) read(Alumno) write(‘Facultad’) read(Facultad) write(‘Area’) read(Area) write(‘Clave de la Asignatura’) read(ClaveAsig1) read(ClaveAsig2) read(ClaveAsig3) write(‘Asignatura’) read(Asig1) read(Asig2) read(Asig3) write(‘Evaluacion’) read(Calif1) read(Calif2) read(Calif3) 4.- [Imprimir datos] write(‘CENTRO DE BACHILLERATO TECNOLOGICO Industrial y de Servicios 172’) write(‘’) write(‘BOLETA DE CALIFICACIONES’) write(‘’) write(‘MATRICULA:’ Matricula) write(‘ALUMNO:’ Alumno) write(‘FACULTAD:’ Facultad)

Page 58: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

write(‘AREA:’ Area) write(‘’) write(‘ASIGNATURA’) write(‘CLAVE, ASIGNATURA , EVALUACION’) write(ClaveAsig1, Asig1, Calif1) write(ClaveAsig2, Asig2, Calif2) write(ClaveAsig3, Asig3, Calif3) write(‘’) 5.- [Fin] @

Page 59: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

DIAGRAMA DE FLUJOD

INICIO

‘Ingrese el numero de matricula’

Matricula

‘Ingrese el nombre del alumno’

Alumno

‘Facultad’

Facultad

‘Area’

Area

‘Clave de la Asignatura’

CalveAsig1

CalveAsig2

CalveAsig3

1

1

‘Asignatura’

Asig1

Asig2

Asig3

‘Evaluacion’

Calif1

Calif2

Calif3

‘CENTRO DE BACHILLERATO TECNOLOGICO Industrial y de Servicios 172’‘’

‘BOLETA DE CALIFICACIONES’‘’

‘MATRICULA:’ Matricula‘ALUMNO:’ Alumno

‘FACULTAD:’ Facultad‘AREA:’ Area

‘’‘ASIGNATURA:’

‘CLAVE, ASIGNATURA, EVALACION’ClaveAsig1, Asig1, Calif1ClaveAsig2, Asig2, Calif2ClaveAsig3, Asig3, Calif3

‘’

FIN

Page 60: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

PANTALLA DE SALIDA

Menú.

PSEUDOCODIGO 1.- [Menu] 2.- [Declarar variables] Opc; Char Suma, Precio, Total; Real Cant; Int 3.- [Establecer menú] read(Opc) 4.- [Inicializar variables] Suma←0 5.- [Establecer ciclo] While (Opc<=3) and (Opc>=1) 6.- [Caso] Case Opc: ‘1’ write(‘Precio’) read(Precio) write(‘Cantidad’) read(Cant) Opc: ‘2’ write(‘Precio’) read(Precio) write(‘Cantidad’) read(Cant) Opc: ‘3’ write(‘Precio’) read(Precio) write(‘Cantidad’) read(Cant) Opc: ‘4’ write(‘Salir’) 7.- [Calcular importe] Importe← Cant*Precio Suma← Suma+Importe 8.- [Volver a pedir menú]

Page 61: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

read(Opc) 9.- [Imprimir datos] Total← Suma write(‘Total:’ Total) 10.- [Fin] @

Page 62: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

DIAGRAMA DE FLUJOD

INICIO

Opc

Suma← 0

While (Opc<=3) and (Opc>=)

Case

Opc: ‘1’ Opc: ‘2’ Opc: ‘3’ Opc: ‘4’

‘Precio’

Precio

‘Cantidad’

Cant

‘Precio’

Precio

‘Cantidad’

Cant

‘Precio’

Precio

‘Cantidad’

Cant

‘Salir’

Importe← Cant*Precio

Suma← Suma+Importe

Opc

Total← Suma

‘Total:’ Total

FIN

Page 63: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

PANTALLA DE SALIDA

Tarea.

PSEUDOCODIGO 1.- [Venta de pacas] 2.- [Declarar variables]

Opc: Char Cant: Int Suma, Precio, Pago; Real 3.- [Pregunta consumo] write(‘Elija el tipo de pacas:’) write(‘1 Alfalfa’) write(‘2 Maíz’) write(‘3 Sorgo’) write(‘4 Cebada’) write(‘5 Salir’) write(‘Ingrese el numero de la opción a elegir’) read(Opc) 4.- [Inicializar variables] Suma←0 5.- [Establecer ciclo] While (Opc<=4) and (Opc>=1) 6.- [Caso] Opc: ‘1’ write(‘Cantidad deseada’) read(Cant) write(‘Precio’) read(Precio) Opc: ‘2’ write(‘Cantidad deseada’) read(Cant) write(‘Precio’) read(Precio) Opc: ‘3’ write(‘Cantidad deseada’) read(Cant) write(‘Precio’) read(Precio)

Page 64: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

Opc:’4’ write(‘Cantidad deseada’) read(Cant) write(‘Precio’) read(Precio)

7.- [Calcular pago] Pago← Cant*Precio Suma← Suma+Pago

8.- [Volver a preguntar] write(‘Desea otra cosa’) read(Opc) 9.- [Imprimir datos] write(‘El total de su compra es:’ Suma) 10.- [Fin] @

Page 65: pseudocodigos CBTis172

Pseudocódigos y Diagramas de Flujo 2010

Centro de Bachillerato Tecnológico Industrial y de servicios no. 172 Cortázar, Gto, Mex.

2010

DIAGRAMA DE FLUJOD

INICIO

Opc

Suma← 0

While (Opc<=4) and (Opc>=)

Case

Opc: ‘1’ Opc: ‘2’ Opc: ‘3’ Opc: ‘5’

‘Precio’

Precio

‘Cantidad deseada’

Cant

‘Salir’

Pago← Cant*Precio

Suma← Suma+Pago

Opc

Total← Suma

‘Total:’ Total

FIN

‘Elija el tipo de pacas:’‘1 Alfalfa’‘2 Maíz’‘3 Sorgo’

‘4 Cebada’‘5 Salir’

‘ Ingrese el numero de la opción a elegir’

‘Precio’

Precio

‘Cantidad deseada’

Cant

‘Precio’

Precio

‘Cantidad deseada’

Cant

‘Precio’

Precio

‘Cantidad deseada’

Cant

Opc: ‘4’

‘Desea otra cosa’