Jump to content
Fórum Script Brasil
  • 1

Olá boa tarde, pode me ajudar?


Bryan Vinícius

Question

Olá boa noite!

Estou com uma grande duvida, faço curso de T.I e meu professor quer que nós passemos um código que fizemos em portugol no visualg para a linguagem C, estou muito perdido em como fazer isso.

 

programa
{
   
       inclua biblioteca Util --> u
     inclua biblioteca Matematica --> mat
   
   
    cadeia pausa
     funcao inicio()
   {
         inteiro opc
         faca
    {
        limpa()
        //mostrar lista de opções
        escreva("▬▬▬▬▬▬▬▬▬▬▬*** MENU PRINCIPAL ***▬▬▬▬▬▬▬▬▬▬▬")
        escreva("\n▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬")
        escreva("\n[1] Descubra a sua média")
        escreva("\n[2] Comparar números")
        escreva("\n[3] Tabuada")
        escreva("\n[4] Sucessor e Antecessor")
        escreva("\n[5] Área do triangulo")
        escreva("\n[6] Sequência númérica")
        escreva("\n[7] Cálculos Básicos [+];[-];[/];[*]")    
        escreva("\n[8] Bhaskara")
        escreva("\n[9] Calculadora")
        escreva("\n[10] Dias da semana")
        escreva("\n[11] Estados do Brasil")
        escreva("\n[12] Números escritos")        
        escreva("\n[13] Fim")        
        escreva("\n*** Menu Principal ***")
        escreva("\n▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬")
        escreva("\nEscolha uma das opções:")
          //receber a opção do usuário
        leia (opc)
        
            escolha(opc)        
            {
                caso 1:
                Media()
                pare       
                caso 2:
                Comparar_numeros()
                pare                          
                caso 3:
                Tabuada()
                pare
                caso 4:
                Sucessor_e_Antecessor()
                pare
                caso 5:
                Area_do_triangulo()
                pare      
                caso 6:
                Sequencia_numerica()
                pare
                caso 7:
                Calculos_basicos()
                pare
                caso 8:
                Bhaskara()
                pare
                caso 9:
                Calculadora()
                pare
                caso 10:
                Dias_da_semana()
                pare    
                caso 11:
                Estados_do_Brasil()
                pare
                caso 12:
                Numeros_escritos()
                pare                                                                  
            }
        
    }enquanto (opc!=13)
   }
     funcao Media()
    {
        cadeia r, vr, vrr
        real vA, vB, vC, vD, vE
        limpa()
        escreva("Então você quer saber sua média?")
        leia (r)
        se (r == "sim" ou r == "Sim" ou r == "isso" ou r == "Isso" ou r == "Quero" ou r == "quero")
            faca {
              escreva("\nFale sua nota no 1 bimestre")
            leia(vA)
             escreva("\nFale sua nota no 2 bimestre")
            leia(vB)
             escreva("\nFale sua nota no 3 bimestre")
            leia(vC)
             escreva("\nFale sua nota no 4 bimestre")
            leia(vD)
              vE = (vA + vB + vC + vD) /4
             escreva ("Sua média é " + vE)
                 escreva ("\n Quer saber qual seu conceito?")
                 leia(vr)
                   se (vr == "sim" ou r == "Sim" ou r == "isso" ou r == "Isso" ou r == "Quero" ou r == "quero")
                   {
                     se (vE<5)
                     {
                     escreva("Você ficou com I \n")
                     }
                     senao se(vE<7.5 e vE>5)
                     {
                     escreva("Você ficou com R \n")    
                     }
                     senao se(vE<9.5 e vE >7.5){
                     escreva("Você ficou com B \n")
                     }
                     senao se(vE<10 e vE >9.5)
                     {
                     escreva("Você ficou com MB \n")
                     }
                     escreva ("\n Quer saber se passou?")
                     leia(vrr)
                     se (vrr == "sim" ou r == "Sim" ou r == "isso" ou r == "Isso" ou r == "Quero" ou r == "quero")
                     {
                         se (vE<5)
                         {
                         escreva ("Reprovou\n")
                         }
                         senao
                         {
                         escreva ("Passou de ano\n")
                         }
                     }
                     escreva("Quer calcular outra média?")
                leia (r)
                   }
           } enquanto (r=="sim" ou r == "Sim" ou r == "isso" ou r == "Isso" ou r == "Quero" ou r == "quero")
          
        senao
        escreva("Tchau")
    }  
     funcao Comparar_numeros()
     {
         cadeia vNumero, r
         real vNumb1, vNumb2
          limpa()
         escreva("Vamos comparar números?")
         leia (r)
         se (r == "sim" ou r == "Sim" ou r == "vamos" ou r == "Vamos" ou r == "Bora" ou r == "bora")
         {
         faca
         {
         escreva("Cite um número, por favor: ")
         leia (vNumb1)
         escreva("\nNovamente, cite um número: ")
         leia (vNumb2)

             se (vNumb1 > vNumb2)
             {
         escreva (vNumb1 + "é maior do que " + vNumb2)
             }
             senao se (vNumb1 < vNumb2)
             {
         escreva (vNumb1 + "é menor do que " + vNumb2)
             }
             senao
             {
         escreva (vNumb1 + "é igual a " + vNumb2)
             }
                   escreva("\nQuer calcular outros números?")
                leia (r)
         } enquanto (r=="sim" ou r == "Sim" ou r == "isso" ou r == "Isso" ou r == "Quero" ou r == "quero")
         } senao
         escreva("Tchau")
     }    
    funcao Tabuada()
         {  
             cadeia r
             inteiro a, b
    faca
     {             
             limpa()
             escreva("Nos diga um número:")
             leia(a)
             para(b=1; b<=10; b++)
             {
                 escreva (a + "x" + b + "=" + (a*b) + "\n")
                 u.aguarde(200)
             }
             escreva("Quer fazer com mais números?")
         leia (r)
        } enquanto (r=="sim" ou r == "Sim" ou r == "isso" ou r == "Isso" ou r == "Quero" ou r == "quero")    
           }    
     funcao Sucessor_e_Antecessor()
     {
             cadeia r
             inteiro a, aS, aA
    faca
     {             
             limpa()
             escreva("Então vamos calcular, nos diga um número:")
             leia(a)
             aS = a+1
             aA = a-1
               escreva("O sucessor é = " + aS)
               escreva("\nO antecessor é = " + aA)               
             escreva("\nQuer fazer com mais números?")
         leia (r)
        } enquanto (r=="sim" ou r == "Sim" ou r == "isso" ou r == "Isso" ou r == "Quero" ou r == "quero")             
     }
     funcao Area_do_triangulo()         
     {
     cadeia r
    real B, Al, A
        faca
         {             
                 limpa()
                 escreva("Então vamos calcular, nos diga o valor da Base: ")
                 leia(B)
                 escreva("Então vamos calcular, nos diga o valor da Altura: ")
                 leia(Al)
                 A = (B*Al)/25
                   escreva("\nA área do triangulo é = " + A)               
                 escreva("\nQuer fazer com mais números?")
         leia (r)
            } enquanto (r=="sim" ou r == "Sim" ou r == "isso" ou r == "Isso" ou r == "Quero" ou r == "quero")             
     }    
     funcao Sequencia_numerica()
     {
         
         cadeia r
         inteiro x, y, z, i
           faca
           {
               limpa()
               escreva("Qual número você deseja iniciar? ")
             leia (x)
            escreva("\nQuantos números serão 'pulados'? ")
            leia (y)
            escreva("\nQual será seu limite?")
            leia (z)            
                para (i=x;i<z;i+=y)
                {
                escreva(i+", ")
                }
             escreva("\nBora fazer outra reta númerica, Simboro? ")
             leia(r)                
            }enquanto (r=="sim" ou r == "Sim" ou r == "bora" ou r == "Bora" ou r == "vamos" ou r == "Vamos")
     }    
     funcao Calculos_basicos()
     {
           cadeia r
          inteiro N1, N2, S, A, M, D
          
        faca
         {             
        limpa()
        escreva("Então bora fazer calculos, nos diga um número:")
        leia(N1)
         escreva("Nos diga mais um número:")
        leia(N2)
        A= N1+N2
        S= N1-N2
        D= N1/N2
        M= N1*N2
         escreva("A soma é = " + A)
         escreva("\nA subtração é = " + S)
         escreva("\nA Divisão é = " + D)   
         escreva("\nA Multiplicação é = " + M)                  
        escreva("\nQuer fazer com mais números?")
         leia (r)
            }enquanto (r=="sim" ou r == "Sim" ou r == "isso" ou r == "Isso" ou r == "Quero" ou r == "quero")    
    }
    funcao Bhaskara()
     {
     cadeia r
    real a, b, c, delta
         faca
         {             
                 limpa()
                 escreva("Então vamos calcular, nos diga o valor de A: ")
                 leia(a)
                 escreva("Então vamos calcular, nos diga o valor de B: ")
                 leia(b)
                 escreva("Então vamos calcular, nos diga o valor de 😄 ")
                 leia(c)
                 delta = b * b - 4 * a * c
                se(b == 0 ou c == 0)
                escreva("Equação incompleta!\n")
                senao { se(delta < 0)
                escreva("Delta: ", delta, "\nEsta equação não possui raizes reais.\n")
                senao{ se(delta == 0)
                escreva("Delta: ", delta, "\nEsta equação possui duas raizes reais iguais.\n")
                senao escreva("Delta: ", delta, "\nEsta equação possui duas raizes reais diferentes.\n")
                escreva("(-b + ou - raiz(delta)) / (2 * a)\n")
                escreva("(-", b," + ou - raiz(", delta,")) / (2 * ", a,")\n")
                escreva("(", -1 * b," + ou - ", Matematica.raiz(delta, 2),") / ", 2 * a,"\n")
                escreva("\nx1 = (", -1 * b + Matematica.raiz(delta, 2),") / ", 2 * a,"\n")
                escreva("x1 = ", (-1 * b + Matematica.raiz(delta, 2)) / (2 * a),"\n")
                escreva("\nx2 = (", -1 * b - Matematica.raiz(delta, 2),") / ", 2 * a,"\n")
                escreva("x2 = ", (-1 * b - Matematica.raiz(delta, 2)) / (2 * a),"\n")
                    }
                      }               
        escreva ("\nQuer fazer com mais raízes?")
         leia (r)
            } enquanto (r=="sim" ou r == "Sim" ou r == "isso" ou r == "Isso" ou r == "Quero" ou r == "quero")     
     }
     funcao Calculadora()
     {
           cadeia r, E
          inteiro N1, N2, S, A, M, D
          
        faca
         {             
        limpa()
        escreva("Então bora fazer calculos, nos diga um número:")
        leia(N1)
         escreva("Nos diga mais um número:")
        leia(N2)
        escreva("Qual calculo você quer fazer")
        leia(E)
        se (E == "Soma")
        {
        A= N1+N2
        escreva("A soma é = " + A)
        }
        se (E == "Subtração")
        {
        S= N1-N2
        escreva("\nA subtração é = " + S)
        }
        se  (E == "Divisão")
        {
        D= N1/N2
        escreva("\nA Divisão é = " + D)
        }
        se (E == "Multiplicação")
        {
        M= N1*N2
          escreva("\nA Multiplicação é = " + M)
        }
         senao {
             limpa()
         escreva("Se você escreveu algo diferente de: Soma, Subtração, Multiplicação ou Divisão. Reescreva")
         }
         escreva("\nQuer fazer com mais números?")
         leia (r)                
            }enquanto (r=="sim" ou r == "Sim" ou r == "isso" ou r == "Isso" ou r == "Quero" ou r == "quero")    
    }
     funcao Dias_da_semana()
    {
     
    inteiro n
     cadeia  r, dia[8]={"Que isso bixo! Tu quer o dia 0, deve ser sei lá primeira-feira!","Segunda-feira","Terça-feira","Quarta-feira","Quinta-feira","Sexta-feira","Sábado","Domingo"}
          faca{
     limpa()
     escreva ("Mi de um número para que eu possa te dar um dia da semana: ")
     leia (n)    
      se (n<8)
      escreva("\nSeu dia é " + dia[n])    
      se (n>7)
      escreva("\nPare né, você sabe que a semana tem 7 dias!")

      escreva("\nQuer fazer denovo?")
     leia (r)        
     }enquanto (r=="sim" ou r == "Sim" ou r == "isso" ou     r == "Isso" ou r == "Quero" ou r == "quero")
    }
     funcao Estados_do_Brasil()
    {
        cadeia estado[27][2]
        estado[0][0] = "SP" estado[0][1] = "São Paulo"
        estado[1][0] = "MG" estado[1][1] = "Minas Gerais"
        estado[2][0] = "ES" estado[2][1] = "Espirito Santo"
        estado[3][0] = "BA" estado[3][1] = "Bahia"
        estado[4][0] = "PE" estado[4][1] = "Pernambuco"
        estado[5][0] = "AC" estado[5][1] = "Acre"
        estado[6][0] = "AL" estado[6][1] = "Alagoas"
        estado[7][0] = "AP" estado[7][1] = "Amapá"
        estado[8][0] = "AM" estado[8][1] = "Amazonas"
        estado[9][0] = "CE" estado[9][1] = "Ceará"
        estado[10][0] = "GO" estado[10][1] = "Goiás"
        estado[11][0] = "MA" estado[11][1] = "Maranhão"
        estado[12][0] = "MT" estado[12][1] = "Mato Grosso"
        estado[13][0] = "MS" estado[13][1] = "Mato Grosso do Sul"
        estado[14][0] = "PA" estado[14][1] = "Pará"
        estado[15][0] = "PB" estado[15][1] = "Paraíba"
        estado[16][0] = "PI" estado[16][1] = "Piauí"
        estado[17][0] = "RR" estado[17][1] = "Roraima"
        estado[18][0] = "RO" estado[18][1] = "Rondônia"
        estado[19][0] = "RJ" estado[19][1] = "Rio de Janeiro"
        estado[20][0] = "RS" estado[20][1] = "Rio Grande do Sul"
        estado[21][0] = "RN" estado[21][1] = "Rio Grande do Norte"
        estado[22][0] = "SC" estado[22][1] = "Santa Catarina"
        estado[23][0] = "SE" estado[23][1] = "Sergipe"
        estado[24][0] = "TO" estado[24][1] = "Tocantins"
        estado[25][0] = "PR" estado[25][1] = "Paraná"
        estado[26][0] = "DF" estado[26][1] = "Distrito Federal"
        cadeia texto, r
        inteiro i
        logico vachou
        faca{
        limpa()
        escreva ("Informe o nome ou a sigla do estado:")
        leia (texto)

        vachou = falso
        para (i=0;i<=4;i++)
        se (texto == estado[i][0])
        {
         escreva ("\n" + texto + " corresponde a " + estado[i][1])
         vachou = verdadeiro         
        }
        se (não vachou)
       {
       escreva("\n Este estado não existe ou você digitou errado")
       }
       senao
       escreva("\nQuer fazer com mais estados?")
      leia (r)
      }enquanto (r=="sim" ou r == "Sim" ou r == "isso" ou     r == "Isso" ou r == "Quero" ou r == "quero")    
    }
     funcao Numeros_escritos()         
    {
     cadeia r
     cadeia unidade[20]={"","um", "dois", "três", "quatro", "cinco", "seis", "sete", "oito", "nove", "dez", "onze", "doze", "treze", "quatorze", "quinze", "dezesseis", "dezessete", "dezoito", "dezenove" }
     cadeia dezena[10]={"", "", "vinte", "trinta", "quarenta", "cinquenta", "sessenta", "setenta", "oitenta", "noventa"}
     cadeia centena[10]={"", "Cento", "Duzentos", "Trezentos", "Quatrocentos", "Quinhentos", "Seiscentos", "Setecentos", "Oitocentos", "Novecentos"}
     inteiro n, ne=0, nd=0, w=0, t=0
    faca
     {             
    limpa()
     escreva("Digite um números (0-1000): ")
     leia(n)
     se(n<0 ou n>1000)
     {
     escreva("\n Número fora da faixa")    
     }
     se(n<20)
     {
     escreva("\n" + unidade[n])    
     }
     senao se(n<100)
     {
     ne = n / 10
     nd = n % 10    
     }
     se(nd>0)
     {
     escreva("\n" + dezena[ne] + " e " + unidade[nd])    
     }
     senao se(n==100)
     {
     escreva("\nCem")    
     }

 


     
     se(n>100 ou n<1000)
     {
     ne = n / 100
     w = n % 100
     t = w / 10
     nd = w % 10
     escreva("\n" + centena[ne])             
     
     se(w<20)
     {
     escreva("\n" + unidade[n])    
     }
     senao se(t>0)
     {
         escreva(" e " + dezena[t])
        se(nd>0)     
        {
            escreva(" e " + unidade[nd])        
        }
     
     }  
     }
     senao se(n==1000)
     {
     escreva("\nMil")    
     }  
    escreva("\nQuer fazer com mais números?")
     leia (r)
        } enquanto (r=="sim" ou r == "Sim" ou r == "isso" ou r == "Isso" ou r == "Quero" ou r == "quero")
    }
     
}

Link to comment
Share on other sites

0 answers to this question

Recommended Posts

There have been no answers to this question yet

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.



  • Forum Statistics

    • Total Topics
      152.1k
    • Total Posts
      651.8k
×
×
  • Create New...