Составьте программу вычисления корней квадратного уравнения по данным значениям ...

August 2022 1 2 Report

Составьте программу вычисления корней квадратного уравнения по данным значениям его коэффициентов
Помогите пожалуйста
Заранее спасибо

Answers & Comments

A1dar var a,b,c,d,x,x1,x2:real;
begin
write ('a='); read (a);
write ('b='); read (b);
write ('c='); read (c);
d:=b*b-4*a*c;
if d<0 then writeln ('NO')
         else if d>0 then
                       begin
                         x1:=(-b+sqrt(d))/(2*a);
                         x2:=(-b-sqrt(d))/(2*a);
                         writeln ('x1=',x1:0:2,' x2=',x2:0:2)
                       end
                     else
                       begin
                         x:=-b/(2*a);
                         writeln ('x=',x);
                       end
end.

2 votes Thanks 8

Answers & Comments

1chto otnositsya k osnovnym zadacham raskrojnogo ceha 2kakoj metod nastilaniya is

zapishite predlozheniyavstaviv nedostayushie znaki prepinaniya vypolnite polnyj sint

pomogite pozhalujstaochen nado nado sdelat sintaksicheskij razbor predlozheniya n

dopisat uravneniya rasstavit koefficienty nazvat vse veshestva opredelit ti

kakoe stroenie imeet bolshinstvo lipidov

kakoe znachenie imeyut obychno sluzhebnye chasti rechi 1 leksicheskoe 2 grammaticheskoe

skolko raz zvuk e vstrechaetsya v otryvke iz stihotvoreniya feta svet nebes v

kakoe izobrazitelno vyrazitelnoe sredstvo ispolzovano v otryvke iz stihotvore

sochinenie na temu opisanie pamyatnika arhitektury pomogite pozhalujsta nado do v

zadacha cos 1 najdite sina 2i obyasnit sincostg osnovnoe trig

рекомендуемые вопросы

Helpful Links

Helpful Social