Напишите в turbo pascal: b+√(b^2+4ac)/2a - a^3c+b^-2

mtoropchin mtoropchin    2   20.05.2019 10:30    5

Ответы
v201612 v201612  13.06.2020 19:11

 Program Pr1; Uses Crt;

 var a,b,c: integer; y: real;

 begin clrscr;

Writeln('введите a,b,c');

 Readln(a,b,c); 

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

Writeln('Y=', y:5:2);

Readln;

End.

 

 

 

 

 

 

 

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика