viernes, 6 de junio de 2008

ALGORITMOS

1
inicio
Lea v[n]
Máximo =[i]
Para i =1,n,1 haga
Si v[i]> maximo entonces
Maximo=v[i]
Fin si
Fin para
Imprima maximo
fin

2
inicio
Lea =v[i]
Para i =1, n,1 haga
Si v [i]> menor entonces
Menor = v[i]
Fin para
Imprima minimo
Fin

3
Inicio
Lea= v [m]
Para i =1, n,1 haga
Si = v [m]1/2=mitad entonces
Imprima mitada de vector
Fin si
Fin para
Fin

4
Entero a[n], b[m],c[n,m]
Inicio
Para i =1 haga n
Para j = 1 haga m
Lea a [i , j]
Fin para
Fin para
Para i= 1 hasta n
Para j = 1 hasta m
Lea b [i, j]
Fin para
Fin para
Para i =1 hasta n
Para j = j 1 hasta m
Lea c [i,j]
C [i,j]=a[i,j]*b[I,j]
Fin para
Fin para
Fin



5
Inicio
Lea m [5*6]
Coni=0, conp=0, conm=0
Para i = 1, 5, 1 haga
para z = 1, 6, 1 haga
Lea m [ i , z ]
Si m [ i , z ] = 0 entonses
Coni= Coni + 1
Sino
Si m [ i , z ] > 0 entonses
conp=conp + 1
sino
Si m [ i , z ] < 0 entonses
Conm = conm + 1
Fin si
Fin si
Fin


6
M(6*5),fil.col,mayor
Fil_mayor,col_mayor
Inicio
Escribir digite n números
Para fil= 1 hasta 6
Para col= 1 hasta 5
Lea m (fil,col)
Fin para
Fin para
Mayor= 20
Para fil=1 hasta 6
Para col = 1 hasta 5
Si m (fil ,col) > mayor
Mayor = m (fil ,col)
Fil_mayor = fil
Col _mayor = col
Fin si
Si mayor = 20
Imprima no es mayor
Si no
Imprima “el mayor # es “, mayor,”y esta en la fila”, fil ,”columna “, col
Fin si
Fin

No hay comentarios: