Skip to content

Instantly share code, notes, and snippets.

@lrlucena
Last active October 5, 2017 17:31
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save lrlucena/05da85d605ea7cddaafc00fe1fb6d284 to your computer and use it in GitHub Desktop.
Save lrlucena/05da85d605ea7cddaafc00fe1fb6d284 to your computer and use it in GitHub Desktop.

Exercícios

1. Mostrar os números de 100 até 200 variando de 10 em 10.

para i de 100 até 200 passo 10 faça
  escreva i
fim

2. Mostrar os múltiplos positivos de 7 menores que 100.

para i de 7 até 100 passo 7 faça
  escreva i 
fim

ou

para i de 1 até 100 faça
  se i mod 7 == 0 então
    escreva i 
  fim
fim

3. Calcular e mostrar a soma dos termos da série: 6, 9, 12, 15, ..., 60.

var soma := 0
para i de 6 até 60 passo 3 faça
  soma := soma + i
fim
escreva soma

4. Calcular e mostrar a soma dos termos da série: 7, 9, 11, 13, ..., 99.

var soma := 0
para i de 7 até 99 passo 2 faça
  soma := soma + i
fim
escreva soma

5. Ler um conjunto de valores inteiros positivos e determinar a quantidade de números pares e ímpares digitados.

imprima "Quantos números? "
n = leia_inteiro
var quantidade_pares, quantidade_impares := 0
para i de 1 até n faça
  imprima "Qual o {i}° número? "
  a = leia_inteiro
  se a mod 2 == 0 então
    quantidade_pares := quantidade_pares + 1
  senão
    quantidade_impares := quantidade_impares + 1
  fim
fim
escreva "São {quantidade_pares} números pares"
escreva "São {quantidade_impares} números ímpares"

6. Ler dois valores e calcular o MDC e o MMC entre eles.

escreva "Digite dois números"
a, b = leia_inteiro
var mdc := 1
para i de 2 até a faça
  # testa se i é uma divisor de a e b.
  se a mod i == 0 e b mod i == 0 então
    mdc := i
  fim
fim
escreva "O MDC de {a} e {b} é {mdc}."

var mmc := a * b
para i de a * b até a passo -1 faça
  # testa se a e b são múltiplos de i.
  se i mod a == 0 e i mod b == 0 então
    mmc := i
  fim
fim
escreva "O MMC de {a} e {b} é {mmc}."

7. Calcular o valor de S, dado abaixo S = 1/1 + 3/2 + 5/3 + ... + 99/50

var s := 0
para denominador de 1 até 50 faça
  numerador = denominador * 2 - 1
  s := s + numerador / denominador
fim
escreva s

8. Imprimir os N primeiros termos da série de Fibonacci, dada por: 1, 1, 2, 3, 5, 8, 13, ..., ou seja, a série inicia com dois valores iguais a um e cada termo subsequente é dado pela soma dos dois anteriores.

var a, b := 1
imprima "Quantos números você quer imprimir? "
n = leia_inteiro
para i de 1 até n faça
  escreva a
  a_antigo = a
  b_antigo = b
  a := b_antigo
  b := a_antigo + b_antigo
fim

9. Calcular o valor de S, dado abaixo:

var s := 0
var sinal := 1
para i de 10 até 100 passo 5 faça
  s := s + sinal * i
  sinal := -sinal
fim
escreva s 

ou

var s := 0
para i de 10 até 100 passo 10 faça
  s := s + i
fim
para i de 15 até 100 passo 10 faça
  s := s - i
fim
escreva s 

10. Ler um número e verificar se ele é ou não um número primo.

imprima "Digite um número: "
n = leia_inteiro
var primo := verdadeiro
para i de 2 até n-1 faça
  se n mod i == 0 então
    primo := falso
  fim
fim
se primo então
  escreva "{n} é um número primo."
senão
  escreva "{n} não é um número primo."
fim
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment