Ejercicios Algoritmos y DFD

Descargar como pdf o txt
Descargar como pdf o txt
Está en la página 1de 4

PROGRAMA PARA CALCULAR LA ECUACIÓN DE 2DO.

GRADO

Diagrama de Flujo
Inicio

Real a, b, c, ,x1,x2, xr, xi;

Escribe (“PROGRAMA PARA


CALCULAR LA ECUACION DE
2DO GRADO”) ;

Leer (a), (b), (c);

Escribir (a), (b), (b);

d←b*b-(4*a*c);

Si
d>0

No x1←-b+raizcuad(d)/(2*a)
x2←-b-raizcuad(d)/(2*a)
No
d=0
Escribir “Las dos
raíces son reales:”
Si
x1,x2
xr←-b/(2*a) x←-b/(2*a)
xi←raizcuad(-d)/(2*a)

Escribir “La Ecuación


Escribir “La raíz real solo tiene una raíz:”
es:” xr
“La raíz imaginaria
es: + - “ xi

Fin
Pseudocódigo

Inicio
Real x1,x2,y1,y2,x,y,D;
Escribir (“Programa para calcular la Ecuación de 2do. grado ”);
Leer (a), (b), (c);
Escribir (a), (b), (b);
d←b*b-(4*a*c);
Si (d>0)
x1=((-b+sqrt(d))/(2*a));
x2=((-b-sqrt(d))/(2*a));
Escribir “Las dos raíces son reales:” x1,x2
Fin_Si
Sino
Si(d=0)
x1=(-b/(2*a))
Escribir “La Ecuación solo tiene una raíz: “x1
Fin_Si
sino
xr=(-b/(2*a));
xi=(sqrt(-d))/(2*a)
Escribir “La raíz real es: “ xr
Escribir “La raíz imaginaria es: + -” xi
Fin_Si
Fin

𝑏 2 −4𝑎𝑐
a𝑥 2 +bx+c (a,b,c) -b +- 2𝑎

𝑥 2 − 5𝑥 + 6 = 0 (1,-5,6) Resultados (3,2) TIENE LAS DOS RAÍCES

𝑥 2 + 2𝑥 + 1 = 0 (1,2,1) Resultados (-1) ÚNICA RAÍZ

𝑥 2 − 2𝑥 + 3 = 0 (1,-2,2) Resultados (1i) CON RAÍZ IMAGINARIA O COMPLEJA


PROGRAMA PARA DETERMINAR EL MÁXIMO, EL MÍNIMO Y LA MEDIA ARITMÉTICA

Diagrama de Flujo Inicio

Entero N, max, min

Real num, media

N=0, max=0,min=0,
media=0,*num=NULL,
num=new float[0]

Escribe (“Ingrese por favor


la Cantidad de Números
que desea evaluar:”)

Leer N

Escribir N

Para (i=0; i<N;i++)

num[i]

num[i]
>max

max ←num[i]

min ←num[0]

min>n
um[i]
min ←num[i]

media ←(max+min)/2

Escribir
“ Número de Datos :”N
“ Máximo:”max
“ Mínimo:”min
“ Media Aritmética:”media

Fin
Pseudocódigo
Inicio
Entero N, max, min
Real num, media
Entero N=0
Entero max=0,min=0
Real media=0
Real *num=NULL
num=new float[0]
Escribir “Ingrese por favor la Cantidad de Números que desea evaluar:”
Leer N
Escribir N
Para(i ← 0; i<N; i++)
Leer num[i]
Fin_Para
Para(i ← 0; i<N; i++)
Escribir num[i]
Fin_Para
Para(i ← 0; i<N; i++)
Si num[i]>max
max= num[i]
Fin_Si
min= num[0]
Fin_Para
Para(i ← 0; i<N; i++)
Si min>num[i]
min= num[i]
Fin_Si
min= num[i]
Fin_Para
media=((max+min)/2)
Escribir “ Número de Datos :”N
Escribir “ Máximo:”max
Escribir “ Mínimo:”min
Escribir “ Media Aritmética:”media
Fin

También podría gustarte

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