Last active
November 9, 2016 23:18
-
-
Save maltzsama/66db434ca33f8dff24aa1cc2e67a544a to your computer and use it in GitHub Desktop.
lista de exercicio
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Algoritmo "MMC" | |
| Var num1, num2, i, mmc, aux :inteiro; | |
| Inicio | |
| // Seção de Comandos, procedimento, funções, operadores, etc... | |
| mmc <- 0; | |
| leia (num1) | |
| leia (num2) | |
| para i de 1 ate num2 faca | |
| aux <- num1 * i; | |
| se ((aux mod 2) = 0) entao | |
| mmc <- aux; | |
| i <- num2 + 1; | |
| fimse | |
| fimpara | |
| se (mmc = 0) entao | |
| escreva ("mmc nao encontrado"); | |
| senao | |
| escreva ("mmc é") | |
| escreva (mmc) | |
| fimse | |
| Fimalgoritmo |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Algoritmo "MDC" | |
| Var num1, num2, resto :inteiro; | |
| Inicio | |
| // Seção de Comandos, procedimento, funções, operadores, etc... | |
| leia (num1) | |
| leia (num2) | |
| repita | |
| resto <- num1 mod num2 | |
| num1 <- num2 | |
| num2 <- resto | |
| ate resto = 0 | |
| escreva (num1) | |
| Fimalgoritmo |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Algoritmo "Tipo-FIBONACCI" | |
| Var | |
| // Seção de Declarações das variáveis | |
| termo1,termo2,novoTermo,i : inteiro | |
| Inicio | |
| // Seção de Comandos, procedimento, funções, operadores, etc... | |
| leia(termo1) | |
| leia(termo2) | |
| novoTermo := 0 | |
| Escreval(" 1o. termo = ", termo1) | |
| Escreval(" 2o. termo = ", termo2) | |
| PARA i DE 3 ATÉ 20 FAÇA | |
| novoTermo := termo1 + termo2 | |
| Escreval(i,"o. Termo = ", novoTermo) | |
| termo1 := termo2 | |
| termo2 := novoTermo | |
| FIMPARA | |
| Fimalgoritmo | |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Algoritmo "FIBONACCI" | |
| Var | |
| // Seção de Declarações das variáveis | |
| medaltm, nmulher, nhomem, i, sexo, total : inteiro; | |
| alt, altTotal, medAlt, porcent, supAlt, menAlt : real; | |
| Inicio | |
| // Seção de Comandos, procedimento, funções, operadores, etc... | |
| medaltm := 0 | |
| nmulher := 0 | |
| altTotal := 0 | |
| total := 5 | |
| nhomem := 0 | |
| menAlt := 100 | |
| supAlt := 0 | |
| PARA i DE 1 ATÉ total FAÇA | |
| Escreval("digite o sexo(1-M/2-H)") | |
| leia(sexo) | |
| Escreval("digite altura") | |
| leia(alt) | |
| se (alt > supAlt) entao | |
| supAlt := alt | |
| fimse | |
| se (menAlt > alt) entao | |
| menAlt := alt | |
| fimse | |
| se (sexo = 1) entao | |
| nmulher := nmulher + 1 | |
| altTotal := altTotal + alt | |
| senao | |
| nhomem := nhomem + 1 | |
| fimse | |
| FIMPARA | |
| medAlt := altTotal / nmulher | |
| escreval ("maior altura: ", supAlt) | |
| escreval ("Menor altura: ", menAlt) | |
| escreval ("media da altura das mulheres: ", medAlt) | |
| escreval ("numero de homens: ", nhomem) | |
| escreval ("numero porcentual de homens:", nhomem*100/total) | |
| Fimalgoritmo |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Algoritmo "Vetor" | |
| Var | |
| // Seção de Declarações das variáveis | |
| vet, v: vetor [1..20] de real; | |
| i : inteiro; | |
| Inicio | |
| PARA i DE 1 ATÉ 20 FAÇA | |
| leia(vet[i]) | |
| se ((i mod 2) = 0) entao | |
| v[i] := vet[i]*2 | |
| senao | |
| v[i] := vet[i]*3 | |
| fimse | |
| FIMPARA | |
| PARA i DE 1 ATÉ 20 FAÇA | |
| escreva(v[i]) | |
| FIMPARA | |
| Fimalgoritmo | |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Algoritmo "Vetor" | |
| Var | |
| // Seção de Declarações das variáveis | |
| v: vetor [1..20] de inteiro; | |
| i, aux, n : inteiro; | |
| Inicio | |
| n := 20; | |
| PARA i DE 1 ATE n FAÇA | |
| leia(v[i]) | |
| fimpara | |
| PARA i de 1 ATE (10) FACA | |
| aux := v[n - i + 1] | |
| v[n-i+1]:=v[i] | |
| v[i]:=aux | |
| FIMPARA | |
| PARA i DE 1 ATE 20 FAÇA | |
| escreva(v[i]) | |
| FIMPARA | |
| Fimalgoritmo |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Algoritmo "notas baixas" | |
| Var | |
| nnotasup, nnotamenor, i : inteiro; | |
| porc, nota: real; | |
| Inicio | |
| nnotasup := 0 | |
| nnotamenor := 0 | |
| PARA i DE 1 ATÉ 30 faca | |
| Escreval("digite uma nota: ") | |
| leia(nota) | |
| porc := 6 * 10 /100 | |
| se (nota > 6 + porc) entao | |
| nnotasup := nnotasup + 1 | |
| fimse | |
| se (nota < 6 - porc) entao | |
| nnotamenor := nnotamenor +1 | |
| fimse | |
| FIMPARA | |
| escreval ("maior numero: ", nnotasup) | |
| escreval ("Menor numero: ", nnotamenor) | |
| Fimalgoritmo |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| algoritmo "Intersecao" | |
| var | |
| v: vetor [1..10] de inteiro | |
| a: vetor [1..10] de inteiro | |
| b: vetor [1..10] de inteiro | |
| aux, i, j : inteiro | |
| inicio | |
| aux <- 1 | |
| para i de 1 ate 10 faca | |
| escreva ("escreva dado do vetor 1") | |
| leia (a[i]) | |
| fimpara | |
| para i de 1 ate 10 faca | |
| escreva ("escreva dado do vetor 2") | |
| leia (b[i]) | |
| fimpara | |
| i <- 1 | |
| j <- 1 | |
| enquanto ((j <= 10) E (i <= 10)) faca | |
| se (a[i] < b[j]) entao | |
| i <- i + 1 | |
| escreva(i) | |
| senao | |
| se (a[i] > b[j]) entao | |
| j <- j + 1 | |
| escreva(j) | |
| senao | |
| v[aux] <- b[j] | |
| j <- j + 1 | |
| i <- i + 1 | |
| aux <- aux + 1 | |
| escreva(aux) | |
| fimse | |
| fimse | |
| fimenquanto | |
| para i de 1 ate (aux - 1) faca | |
| escreval ("escreva dado do vetor coisado") | |
| escreval (v[i]) | |
| fimpara | |
| fimalgoritmo |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| #include <stdio.h> | |
| int main(){ | |
| int a[10] = {1,2,3,4,5,6,7,8,9,0}; | |
| int b[10] = {1,1,2,2,3,3,4,4,5,5}; | |
| int v[10]; | |
| int aux = 0; | |
| int i = 0; | |
| int j = 0; | |
| printf("=======\n"); | |
| for (i = 0; i< 10; i++){ | |
| printf("%d %d\n", a[i], b[i]); | |
| scanf(" %d", &a[i]); | |
| printf("====\n"); | |
| scanf(" %d", &b[i]); | |
| } | |
| i = 0; | |
| j = 0; | |
| while(i < 10 && j < 10){ | |
| if (a[i] < b[j]) | |
| i++; | |
| else if (a[i] > b[j]) | |
| j++; | |
| else{ | |
| v[aux] = b[j++]; | |
| i++; | |
| aux++; | |
| } | |
| } | |
| for (i = 0; i < aux; i++){ | |
| printf("%d\n", v[i]); | |
| } | |
| return 0; | |
| } |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| algoritmo "Uniao" | |
| var | |
| x: vetor [1..10] de inteiro | |
| y: vetor [1..10] de inteiro | |
| c: vetor [1..20] de inteiro | |
| i, j, k : inteiro | |
| inicio | |
| para i de 1 ate 10 faca | |
| escreva ("escreva dado do vetor 1") | |
| leia (x[i]) | |
| fimpara | |
| para i de 1 ate 10 faca | |
| escreva ("escreva dado do vetor 2") | |
| leia (y[i]) | |
| fimpara | |
| k <- 1 | |
| para i de 1 ate 10 faca | |
| c[k] <- x[i] | |
| k <- k + 1 | |
| fimpara | |
| para i de 1 ate 10 faca | |
| para j de 1 ate 10 faca | |
| se (y[i]= x[j]) entao | |
| interrompa | |
| fimse | |
| fimpara | |
| se (j = 11) entao | |
| c[k] <- y[i] | |
| k <- k + 1 | |
| fimse | |
| fimpara | |
| para i de 1 ate (k - 1) faca | |
| escreval ("escreva dado do vetor coisado") | |
| escreval (c[i]) | |
| fimpara | |
| fimalgoritmo |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| #include<stdio.h> | |
| int main() | |
| { | |
| int i,k=0,x[10],y[10],c[25],j,n,n1; | |
| printf("\n how many elements in SET 1:"); | |
| n = 10; | |
| for(i=0;i<n;i++) | |
| { | |
| printf("\n please enter the elements no %d",i+1); | |
| scanf("%d",&x[i]); | |
| } | |
| n1 = 10; | |
| for(i=0;i<n1;i++) | |
| { | |
| printf("\n please enter elements no %d",i+1); | |
| scanf("%d",&y[i]); | |
| } | |
| for(i=0;i<n;i++) | |
| { | |
| c[k]=x[i]; | |
| k++; | |
| } | |
| for(i=0;i<n;i++) | |
| { | |
| for(j=0;j<n1;j++) | |
| { | |
| if(y[i]==x[j]) | |
| break; | |
| } | |
| if(j==n) | |
| { | |
| c[k]=y[i]; | |
| k++; | |
| } | |
| } | |
| printf("\n the union set is:{"); | |
| for(i=0;i<k;i++) | |
| printf("%d ",c[i]); | |
| printf("}\n"); | |
| } |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| algoritmo "questao10" | |
| var | |
| v: vetor [1..20] de real | |
| cont: vetor [1..20] de real | |
| i, j, idx: inteiro | |
| media, mediana : real | |
| aux, desvio: real | |
| inicio | |
| media <- 0 | |
| para i de 1 ate 20 faca | |
| escreva ("escreva dado do vetor 1 ") | |
| leia (v[i]) | |
| media <- media + v[i] | |
| fimpara | |
| media <- media / 20 | |
| para i de 1 ate 19 faca | |
| idx <- i | |
| para j de i+1 ate 20 faca | |
| se (v[idx] > v[j]) entao | |
| idx <- j | |
| fimse | |
| fimpara | |
| aux <- v[idx] | |
| v[idx] <- v[i] | |
| v[i] <- aux | |
| fimpara | |
| mediana <- (v[10] + v[11]) / 2 | |
| escreval("") | |
| escreva ("essa é a media: ") | |
| escreval (mediana) | |
| escreva ("essa é a mediana: ") | |
| escreval(media) | |
| desvio <- 0 | |
| para i de 1 ate 20 faca | |
| desvio<- desvio +(v[i]*v[i]) | |
| fimpara | |
| desvio <- desvio/20 -(media * media) | |
| escreva("esse é o desvio: ") | |
| escreval(desvio) | |
| para i de 1 ate 20 faca | |
| aux <- 0 | |
| para j de 1 ate 20 faca | |
| se (v[i] = v[j]) entao | |
| aux <- aux + 1 | |
| cont[i] <- aux | |
| fimse | |
| fimpara | |
| fimpara | |
| idx <- 0 | |
| para i de 1 ate 20 faca | |
| se (v[i]>= i)entao | |
| escreval ("O número: ",v[i],". Repetiu : ",cont[i]," vezes.") | |
| idx <- idx + 1 | |
| fimse | |
| fimpara | |
| fimalgoritmo |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment