Sasdssdsdasdsdd
1405 palavras
6 páginas
1) Algoritmo Declare MA(50,10), v2(10), k numérico Declare V1(50) literal Subrotina leitura(CR M (), v(), numérico, b() literal) Declare x,z ,i, j numérico Para i de ate 50 faça Escreva i Leia b(i) Fim_para Para i de ate 10 faça Escreva i Leia v(i) Fim_para Leia x Se x=1 Então parai de 1 ate 50 faça Para j de 1 ate 10 faça Leia M(i,j) Fim_para Fim_para Senão repita leia i Leia j Leia M(i,j) Leia x Ate x=1 Fim_se Fim_subrotina Subrotina caro (M() numérico) Declare x, z, y, i, j, numérico z=M(1,1) ,x=1, y=1 para i de 1 ate 50 faça para j de 1 ate 10 faça se M(i,j)>z então z=M(i,j),x=i,y=j fim_se fim_para fim_para escreva M(x,y) fim_subrotina subrotina barato (M() numérico) Declare x, z, y, i, j,numérico z=M(1,1) ,x=1, y=1 para i de 1 ate 50 faça para j de 1 ate 10 faça se M(i,j)>z então z=M(i,j),x=i,y=j fim_se fim_parafim_para z=M(x,1),y=1 para j de 1 ate 10 faça se M(x,j)>z então z=(x,j), y=j fim_se fim_para escreva M(x,y) fim_subrotina subrotina escrita( M () numérico) declare i, numérico para i de 1 ate 50 faça para j de 1 ate 10 faça escreva M(i,j) fim_para fim_para fim_subrotina repita escreva ‘1-letura’ escreva ‘2-mais caro’ escreva ‘3- o mais barato’ escreva ‘4-escreva’ escreva ‘5-para encerrar o menu’ leia k se k=1 então leitura (MA,v1,v2) fim_se se k=2 então caro(MA) fim_se se k=3 então barato(MA) fim_se se k=4 então escrita(MA) fim_se ate k=5 fim_algoritmo 2) Algoritmo Declare ve1(100), ve2(100), ve3(100) Subrotina vetores (CR v() numérico) Declare i numerico Para i de 100 ate 1 passo -1 faça Escreva ‘ digite apenas um numero’ Leia v(i) Fim_para Fim_subrotina Vetores(ve1) Vetores(ve2)
Z=0 Para p de 100 ate 1 passo -1 faça K=ve1(p)+ve2(p)+z Se k >10 Então ve3(p)= ve1(p)+ve2(p) z=0 Senão H= ve1(p)+ve2(p) ve3(p)=H-10 z=1 fim_se fim_para fim_algoritmo 3) Algoritmo Tipo ficha = registros NC, NCC, agencia, DV, valor numérico Nome literal Fim_registro Declare cheque(1000) ficha Função numérica validação (z numerico) Declare s, t, i numerico s=z t=0 para i