Informatica

ALGORITMOS RESUELTOS

--------------------------------------------------------------------------

T1.GIF TEMA 1

--------------------------------------------------------------------------Bucles y tomas de decision

--------------------------------------------------------------------------

1.-Hacer un pseudocodigo que imprima los numeros del 1 al 100.

PROGRAMA contador1ENTORNO:
c = 0
ALGORITMO:
Borrar_pantalla( )
MIENTRAS c < 101 HACER
ESCRIBIR c
c = c + 1
FINMIENTRAS
FINPROGRAMA--------------------------------------------------------------------------

2.-Hacer un pseudocodigo que imprima los numeros del 100 al 0, en orden
decreciente.

PROGRAMA contador2
ENTORNO:
c = 100
ALGORITMO:
Borrar_pantalla( )
MIENTRASc = num2 HACER
ESCRIBIR num1
son = son + 1
SI num1 = int( num1 / 2 ) * 2 ENTONCES
pares = pares + 1
SINO
sumaimpa = sumaimpa + num1
FINSInum1 = num1 + 1
FINMIENTRAS
ESCRIBIR "N£meros visualizados: "
ESCRIBIR son
ESCRIBIR "Pares hay: "
ESCRIBIR pares
ESCRIBIR "La suma de los impares es: "
ESCRIBIR sumaimpaFINPROGRAMA

--------------------------------------------------------------------------
TEMA 2
--------------------------------------------------------------------------
Bucles anidados ysubprogramas
--------------------------------------------------------------------------

16.-Imprimir diez veces la serie de numeros del 1 al 10.

PROGRAMA diez
ENTORNO:
serie = 0
ALGORITMO:Borrar_pantalla( )
MIENTRAS serie = 1000 HACER
EN 15,col ESCRIBIR "M"
num = num - 1000
col = col + 1
FINMIENTRAS
SI num >= 900 ENTONCES
EN15,col ESCRIBIR "CM"
num = num - 900
col = col + 2
FINSI
SI num >= 500 ENTONCES
EN 15,col ESCRIBIR "D"
num = num - 500
col = col + 1...