Lista 04 - UFMG

More documents

Recommendations

Info

31) Faça um algoritmo em PORTUGOL que leia um valor N (N ≤ 20) e os N valores de uma variável composta. Ordene os valores recebidos em forma crescente e imprima a variável composta ordenada. algoritmo L4P31; var inteiro: C, I, N, MENOR; real: AUXILIAR, VETOR[1..20]; início imprima("Digite o valor N: "); leia(N); imprima("Digite os ",N," valores da variavel composta:"); para C de 1 até N faça leia(VETOR[C]); fim-para para C de 1 até N - 1 faça MENOR
program l4p31; var C, I, N, menor: integer; auxiliar: real; vetor: array [1..20] of real; begin write('Digite o valor N: '); readln(N); writeln('Digite os ',N,' valores da variavel composta:'); for C := 1 to N do readln(vetor[C]); for C := 1 to N - 1 do begin menor := C; for I := C + 1 to N do if (vetor[I] < vetor[menor]) then menor := I; auxiliar := vetor[menor]; vetor[menor] := vetor[C]; vetor[C] := auxiliar; end; writeln('A variavel composta ordenada em ordem crescente eh:'); for C := 1 to N do write(vetor[C]:6:3,' '); end. program l4p31b; var C, I, N: integer; auxiliar: real; vetor: array [1..20] of real; begin write('Digite o valor N: '); readln(N); writeln('Digite os ',N,' valores da variavel composta:'); for C := 1 to N do readln(vetor[C]); for C := 1 to N - 1 do for I := 1 to N - C do if (vetor[I] > vetor[I + 1]) then begin auxiliar := vetor[I]; vetor[I] := vetor[I + 1]; vetor[I + 1] := auxiliar; end; writeln('A variavel composta ordenada em ordem crescente eh:'); for C := 1 to N do write(vetor[C]:6:3,' '); end. N = input('Digite o valor N: '); fprintf(1,’Digite os %d valores da variavel composta:',N); for C = 1 : N vetor(C) = input(''); end for C = 1 : N - 1 menor = C; for I = C + 1 : N if (vetor(I) < vetor(menor)) menor = I; end end auxiliar = vetor(menor); vetor(menor) = vetor(C); vetor(C) = auxiliar; end fprintf(1,’A variavel composta ordenada em ordem crescente eh:\n'); for C = 1 : N fprintf(1,’%f ',vetor(C)); end <strong>UFMG</strong> – ICEx – DCC – Programação de Computadores – 2º. Sem 2005 – David Menoti 51
Page 1 and 2: Universidade Federal de Minas Gerai
Page 3 and 4: 3) Escreva um algoritmo em PORTUGOL
Page 11 and 12: 11) Escreva um algoritmo em PORTUGO
Page 17 and 18: program l4p16b; var C: integer; ALT
Page 19 and 20: 18) Implementar um algoritmo em POR
Page 23 and 24: program l4p19; var C, CODSEXO, NMUL
Page 25 and 26: for C = 1 : 50 ALTURA = input('Altu
Page 27 and 28: 20) Construa um algoritmo em PORTUG
Page 29 and 30: SOMAPAR = 0; SOMAIMP = 0; CPAR = 0;
Page 31 and 32: program l4p21; var NDIAS, C : integ
Page 33 and 34: 23) Fazer um algoritmo em PORTUGOL
Page 35 and 36: 24) Dado um conjunto de 100 valores
Page 37 and 38: algoritmo L4P25B; var inteiro: C, N
Page 39 and 40: 26) Um armazém trabalha com 100 me
Page 41 and 42: program l4p27; var RECENTE1, RECENT
Page 47 and 48: M =input('Digite o valor de M: ');
Page 49: program l4p30; var C, I, J, N: inte
Page 53 and 54: 32) Faça um algoritmo em PORTUGOL
Page 55 and 56: N = input('Digite o valor N: '); fp
Page 57 and 58: program l4p33; var C, I, n, nvezes
Page 59 and 60: for C = 1 : 10 numero(C) = input('D

Lista 04 - UFMG

You also want an ePaper? Increase the reach of your titles

Delete template?

Save as template?