Scribd
Carregar
39K visualizações1 página

Algoritmo (Visualg) para Resolver Equação Do 2º Grau

Este algoritmo lê os valores de entrada a, b e c para uma equação do segundo grau. Em seguida, calcula o delta e determina se a equação tem 0, 1 ou 2 raízes reais, imprimindo os resultados apropriadamente.

Enviado por

Flávio Paixão
Direitos autorais
© Attribution Non-Commercial (BY-NC)
Levamos muito a sério os direitos de conteúdo. Se você suspeita que este conteúdo é seu, reivindique-o aqui.
Formatos disponíveis
Baixe no formato TXT, PDF, TXT ou leia on-line no Scribd
39K visualizações1 página

Algoritmo (Visualg) para Resolver Equação Do 2º Grau

Este algoritmo lê os valores de entrada a, b e c para uma equação do segundo grau. Em seguida, calcula o delta e determina se a equação tem 0, 1 ou 2 raízes reais, imprimindo os resultados apropriadamente.

Enviado por

Flávio Paixão
Direitos autorais
© Attribution Non-Commercial (BY-NC)
Levamos muito a sério os direitos de conteúdo. Se você suspeita que este conteúdo é seu, reivindique-o aqui.
Formatos disponíveis
Baixe no formato TXT, PDF, TXT ou leia on-line no Scribd
Você está na página 1/ 1

algoritmo "Equacao2Grau" // Funo : Resolver uma equao do 2 grau.

// Autor : F16cent // Data : 17/08/2011 // Seo de Declaraes var b2, x1, x2, delta, a, b, c :real inicio // Seo de Comandos escreva("Digite o valor de a: ") leia(a) escreva("Digite o valor de b: ") leia(b) escreva("Digite o valor de c: ") leia(c) b2 <- b*b delta <- b2 - 4 * a * c se a = 0 entao escreva("'A' tem que ser diferente de '0'") senao se delta > 0 entao escreval("Existem duas raizes") x1 <- (-b+raizQ(delta)) / 2*a x2 <- (-b-raizQ(delta)) / 2*a escreval("Primeira raiz X'", x1) escreval("Segunda raiz X''", x2) senao se delta = 0 entao escreval("Duas raizes iguais") x1 <- (-b+raizQ(delta)) / 2*a x2 <- (-b-raizQ(delta)) / 2*a escreval("Primeira raiz X'", x1) escreval("Segunda raiz X''", x2) senao se delta < 0 entao escreva("No pertence aos reais") fimse fimse fimse fimse fimalgoritmo

Você também pode gostar

pFad - Phonifier reborn

Pfad - The Proxy pFad of © 2024 Garber Painting. All rights reserved.

Note: This service is not intended for secure transactions such as banking, social media, email, or purchasing. Use at your own risk. We assume no liability whatsoever for broken pages.


Alternative Proxies:

Alternative Proxy

pFad Proxy

pFad v3 Proxy

pFad v4 Proxy