1. Este site usa cookies. Ao continuar a usar este site está a concordar com o nosso uso de cookies. Saber Mais.

Ajuda!! Fluxograma / Pseudocodigo... (Pascal)

Discussão em 'Programação' iniciada por pmpneves, 29 de Outubro de 2007. (Respostas: 14; Visualizações: 5176)

  1. pmpneves

    pmpneves Power Member

    Alguem sabe fazer este exercício???

    3. Construa um algoritmo que, leia uma série de números do teclado e diga quantas
    vezes foi introduzido o número 5. A leitura de números do teclado termina quando for​
    inserido o número zero.

    Ou seja , tenho de fazer um floxograma ou um pseudocódigo com a resolução deste exercício..
    Alguem sabe fazer?
     
  2. RuiBranco

    RuiBranco Folding Member


    assim rapidamente fiz te isto
    é isto que queres ?

    Código:
    nomainwin
        WindowWidth = 412
        WindowHeight = 282
    
        graphicbox #1.graph, -12, -12, -3, -2
    
        texteditor #1.tedit, 1, 1, 403, 235
    
        open "Example" for window as #1
        print #1.graph, "when characterInput [keyPressed]"
        print #1.tedit, "!autoresize"
        print #1, "trapclose [quit]"
    
    [loop]
        #1.graph, "setfocus"
        scan
        goto [loop]
    
    [keyPressed]
        key$ = Inkey$
        if len(key$) < 2 then
            #1.tedit "pressed: "; key$
          if key$ = "5" then log = result : result=(log + 1)  '<< concentra-te mais nesta linha
          if key$ = "0" then #1.tedit "Result: ";result
          else
            '#1.tedit "n/a"
        end if
        goto [loop]
    
    [quit]
        #1.tedit "Quitting"
        close #1
        end
    
    
    
    Corre este codigo em basic com este editor Free http://www.justbasic.com/download.html
    Penso que era isto que pedias

    Cumprimentos.
     
    Última edição: 29 de Outubro de 2007
  3. freskhy

    freskhy Power Member

    .

    Construa um algoritmo que, leia uma série de números do teclado e diga quantas
    vezes foi introduzido o número 5. A leitura de números do teclado termina quando for​
    inserido o número zero.

    soma=0;
    n=0;
    while(n!=5) do {
    readln(n);
    if (n==5) than soma=soma+1;
    }
    printf("Foram introduzidos %d numeros",soma);

    Basicamente e isto, eu dei a sintaxe da algoritmia no secundario que ja vao uns 8 ou 9 anos e ja nao me lembro, mas o wile e um repeat, o prinft e um escreve ou escrever, o readln e um ler, o if e um se, o than e um entao. Acho eu >< espero k ajude, boa sorte


    edit: lololololol coitado do rapaz, o miudo a aprender a metodologia base e tu com altos codigos basic ><
     
  4. Yumon

    Yumon Power Member

    Realmente esse código está ligeiramente complexo para o problema em causa, visto que é para fazer apenas um algoritmo simples......
     
  5. RuiBranco

    RuiBranco Folding Member

    retiro o que disse n vi em que linguagem querias afinal era Pascal mas tb n é mto difrente :007: do meu exemplo podes muito bem tirar ideias na parte do calculo
     
  6. RuiBranco

    RuiBranco Folding Member


    sim tens razão mas ele pede para ler uma serie de numeros entao meti a ler do 0 a 9.
     
  7. RuiBranco

    RuiBranco Folding Member


    peço desculpa :lol:
     
  8. scketer

    scketer Power Member

    whitehat rullz:x2:
     
  9. viperundergroun

    viperundergroun Power Member

    Só uma pequena correção. :) É para terminar quando se insere o numero 0, certo?

    soma=0;
    n=0;
    while(n!=0) do {
    readln(n);
    if (n==5) than soma=soma+1;
    }
    printf("Foram introduzidos %d numeros",soma);
     
  10. Jammin @

    Jammin @ Power Member

    Nada do apresentado é um pseudocódigo alias não há pseudo códigos em linguagens...
     
  11. viperundergroun

    viperundergroun Power Member

    Realmente tens razão.. mas practicamente é só "traduzir"..:)

    Enquanto numero != 0
    Se numero = 5 então
    soma = soma +1
    fim de se
    fim de enquanto
     
  12. eddie_gordo

    eddie_gordo Power Member

    O n nao pode ser inicializado a zero porque senao nunca entra no ciclo while, já que a condiçao para o while é que o n seja diferente de 0...

    Penso eu de que..

    Cumps
     
  13. freskhy

    freskhy Power Member

    .

    alteraram o 5 pra zero e eskeceram-se de mudar o valor inicial, mas e logico
     
  14. Hellseeker

    Hellseeker Power Member

    já não dou pascal á 2 anos, mas acho que poderia ser assim

     
    Última edição: 30 de Outubro de 2007
  15. gomez

    gomez Power Member

    Tb tou a dar pascal..

    Quase todos os dias faço fluxogramas e pseudocódigos.

    Em Novembro, é q vamos transitar para o 3º módulo e entao aí é que vamos passar a realizar os programas em Pascal.

    O meu stor fez um programa, em que podemos testar os fluxogramas e então é 5*

    No caso dos pseudocódigos, é q a coisa é mais negra, mas é easy pascal..

    Queria era C :001:

    Se precisares de ajuda, manda PM
     

Partilhar esta Página