Задание:
Напишите программу, которая по введенным с клавиатуры числам e, f и g будет вычислять значение коэффициентов a,b и c квдратного уравнения по предлагаемымформулам, а также значение дискриминанта D, решать это квадратное уравнение и выдавать результаты его решения. a=|e-f| (|e-f| — в третьей степени) b=корень из (3e+17) (3e+17 — в четвертой степени) c=(g-f): 144, где D=b (в квадрате) — 4ac, корни уравнения x1,2=(-b+- корень изD): 2a отладьте программу на следующем примере: e=2 f=-2 g=3 a=64 b=529 c=0,0347222 d=279832 x1=-6<53267E-05 x2=-8,26556
Решение:
var a,b,c,D,x1,x2: real; e,f,g: integer; beginwriteln ("vvedite koefficienty: "); read (e); read (f); read (g); a: =sqr (abs (e-f)*abs (e-f); b: =sqr (sqr (sqrt (3*e+17); c: =(g-f) /144; D: =sqr (b) -4*a*c; x1: =(-b+sqrt (d) / (2*a); x1: =(-b-sqrt (d) / (2*a); writeln ("x1=",x1,"x2=",x2); readlnend.
Знаете другой ответ?