Algoritmos

Seguindo as regras das dúvidas, seria melhor postar uma dúvida dentro deste modelo:

Citação :

Nome:
Matéria: Algoritmos
Dúvida:
O que você acha que ajudaria mais:

Ai pessoal todos os Algoritmos feitos pelo nosso colega Kevin estão no material de apoio do forum, aqui serve para que vocês pergutem e tire suas duvidas em algum algoritmo feito lá ou qualquer outra coisa...

Valeu!

RoX =P

Citação :

{Cabeçalho}
__Função: Este algoritmo faz a média ponderada de 5
__________notas de um aluno e mostra a sua situação.
__Autor: Alcione de Lucca Júnior
__Data: 13/08/2008
__Versão: 1.0
{Declaração}
__Real: v_N1, v_N2, v_N3, v_N4, v_N5, v_media;
__Cadeia: v_nome, v_matri, v_situacao;
__subalgoritmo obter_dados
___início
_____escreva('Nome: ',v_nome);
_____escreva('Matrícula: ',v_matri);
_____escreva('Primeira nota: ',v_N1);
_____escreva('Segunda nota: ',v_N2);
_____escreva('Terceira nota: ',v_N3);
_____escreva('Quarta nota: ',v_N4);
_____escreva('Quinta nota: ',v_N5);
_____leia(v_N1);
_____leia(v_N2);
_____leia(v_N3);
_____leia(v_N4);
_____leia(v_N5);
_____leia(v_matri);
_____leia(v_nome);
___fim;
__fimsubalgoritmo;
__subalgoritmo media_situacao
___início
_____v_media<-(v_N1*v_N2*v_N3*v_N4*v_N5)/(v_N1+v_N2+v_N3+v_N4+v_N5);
_____Se v_media<6,0 e v_media=>4,0 entao
_______v_situacao <- 'Em exame';
_____fimSe;
_____Se v_media<4,0 entao
_______v_situacao <- 'Reprovado';
_____fimSe;
_____Se v_media=>6,0 entao
_______v_situacao <- 'Aprovado';
_____fimSe;
___fim;
__fimsubalgoritmo;
__subalgoritmo resultado
___início
_____escreva('Média do aluno: ',v_media);
_____escreva('Este aluno está ',v_situacao);
___fim;
__fimsubalgoritmo;
{COMANDOS}
_Início
__{Iniciar Variáveis}
__v_nome <- ' ';
__v_situacao <- ' ';
__v_matri <- ' ';
__v_N1 <- 0;
__v_N2 <- 0;
__v_N3 <- 0;
__v_N4 <- 0;
__v_N5 <- 0;
__v_media <- 0;
__{MONTAR TELA}
__obter_dados;
__media_situacao;
__resultado;
_Fim.

Bom pra quem não veio segunda ou pra quem veio
e não entendeu muito bem tá aí um exemplo de
um algoritmo com Subalgoritmo... xD

Abração

sugiro a criação de um novo topico dentro do forum principal tipo "Diversos", abrangeria outras coisas nao abordadas ainda nos topicos existentes.

Obrigado Samuel concerteza providenciaremos este topico o mais rapido possivel e assim que podermos!
Logo estará este topico aqui no site!

Obrigado

RoX