Código de Pascal/Turbo Pascal - F.Gral Cuadrática

Filtrado por el tag: monitor

Val: 29

F.Gral Cuadrática

Publicado el 11 de Septiembre del 2018 por Maurico (3 códigos)

1.593 visualizaciones desde el 11 de Septiembre del 2018

El programa esta diseñado para calcular ecuaciones de segundo grado y sus dos soluciones, raíz positiva y negativa.

Turbo Pascal /Pascal

Publicado el 11 de Septiembre del 2018

1.594 visualizaciones desde el 11 de Septiembre del 2018

program FORMULA_GENERAL_CUADRATICA;

uses crt;

var

A,B,C,H,H2: real;

begin

clrscr;

writeln('Escribe el valor de A: ');

readln(A);

writeln('Escribe el valor de B: ');

readln(B);

writeln('Escribe el valor de C: ');

readln(C);

H:=(-b+(sqrt(b*b-4*a*c))/2*a);

H2:=(+b-(sqrt(b*b-4*a*c))/2*a);

writeln('El resultado 1 es: ',H);

writeln('El resultado 2 es: ',H2);

readkey;

end.

No hay comentarios


Nombre

Correo (no se visualiza en la web)

Valoración

Comentarios...

CerrarCerrar

Es necesario revisar y aceptar las políticas de privacidad

Acepto las políticas de privacidad

http://lwp-l.com/s4808

Monitor de Impresiones