Ex. 06 - Fatorial

Dado um número, calcule seu fatorial.

Entendendo:

Teremos que ler um número e encontrar seu fatorial, faremos isso entendendo um pouco mais sobre fatorial, ou seja a soma da multiplicação de um número (n) vezes, onde n é o número lido.

Uma possível Solução:

algoritmo "Fatorial"

//Autor: Eduardo V. Souza
// Data : 25/06/2011

var

fat,x,i:inteiro
// declarando as variáveis.
// aqui temos 3 variaveis, uma para o indice do laço
//outra para leitura do número e uma para calcular o fat.
inicio

escreval("Digite um número")
leia(x)

// como vamos multiplicar precisamos inciar o valor de fat com 1
fat<-1

// nesse bloco é calculado o fatorial
//para i que incia de 2 até o núemro lido (x)
para i de 2 ate x faca

//fat que tem o valor de 1 recebe a soma dele mesmo multiplicado
// por i que começa em 2 dentro do laço de repetição
fat<-fat*i
fimpara
//escreve o fatorial
escreval("fatorial =",fat)

fimalgoritmo

Em Execução:

Ex. 05 - Número é par ou ímpar, e se é positivo ou negativo

Faça um algoritmo que leia um nº inteiro e mostre uma mensagem indicando se este número é par ou ímpar, e se é positivo ou negativo.

Entendendo...

Aqui teremos que ler um número e verificar se ele e maior ou menor que zero, e depois verificar se ele e par ou impar, verificaremos se ele e par ou impar pegando o resto da divisão por 2 (mod), se o resultado for zero então ele é par, senao é impar.

Uma possível Solução:

algoritmo "Número é par ou ímpar, e se é positivo ou negativo"

// Autor : Eduardo V. de Souza
// Data : 24/06/2011

var

num: inteiro

inicio

escreval("Digite o número")
leia(num)//Lendo a variável


//verificando o resto da divisão por 2, se = 0 par senao impar
se (num % 2) = 0 entao
escreval("O número é par")
senao
escreval("O número é impar")
fimse

//verificando se é maior ou = 0
// vou considerar aqui zero como numero positivo
se (num >= 0) entao
escreval("O número é positivo")
senao
escreval("O número é negativo")
fimse

fimalgoritmo

Em execução:

EX. 04 - Maior Número

Escreva um algoritmo que leia 3 números inteiros e mostre o maior deles.

Entendendo...

Teremos que ler uma variável e verificar se a mesma foi a maior digitada, para isso usarei condição SE e um Loop (para) e uma variável que ira armazenar o maior número digitado.
Isso é claro supondo que o usuário seja bomzinho e não digite nenhum número negativo ou zero.

Uma Possível Solução.

algoritmo "Maior Numero"

// Autor : Eduardo V. de Souza
// Data : 24/06/2011

var

//declarando as variáveis, importante declarar a variavel do loop
num,maior_num,i : inteiro

inicio

//para comparar os numeros digitados com a varivel maior_num
//eu iniciei ela com 0
maior_num <-0

para i de 1 ate 3 faca //como é preciso digitar 3 numeros, um laço até 3
//aqui uma concatenação para trazer o numero de incremento do laço
//para ficar mais interessante o código
escreval("Digite o ",i,"º Número")
leia(num)
//validação principal, se a variavel maior_num que é = 0 for menor que
//o numero digitado, ela recebera o valor desse numero.
se maior_num < num entao
maior_num<-num
fimse
fimpara

//mostra na tela o valor do maior número
escreval("O maior número digitado foi ",maior_num)

fimalgoritmo

Em execução:

EX. 03 - Calculo de Média

Calcule a média aritmética das 3 notas de um aluno e mostre, além do valor da média, uma mensagem

de "Aprovado", caso a média seja igual ou superior a 6, ou a mensagem "reprovado", caso contrário.

Entendendo...

Iremos ler três variáveis, equivalentes as 3 notas.

Deveremos ter uma variável para guardar a média aritimética.

Teremos que ter um bloco condicional (Se) para validar o valor da média, e exibir mensagens de acordo com o resultado.

Uma possível solução.

algoritmo "Claculo de Média"
// Autor : Eduardo V. Souza
// Data : 23/06/2011

var
nota_1, nota_2, nota_3, media : real

inicio
// Inicia a Leitura das Notas
escreval ("Digite a 1ª Nota")
leia (nota_1)
escreval ("Digite a 2ª Nota")
leia (nota_2)
escreval ("Digite a 3ª Nota")
leia (nota_3)

// aqui atribuimos para variável "media" a soma das
// três notas lidas e é claro dividido por 3.
media <- (nota_1 + nota_2 +nota_3)/3

// primeiro bloco condicional
//verifica se a média for maior ou igual 6, se sim
// mostra mensagem de aprovado, senao reprovado
se media >=6 entao
escreval ("Aluno Aprovado média = ", media)
senao
escreval ("Aluno Reprovado média = ",media)
fimse
fimalgoritmo

Em Execução.

media >=6 entao

media < 6 entao