Bryan Vinícius

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") } }