Предмет: Информатика,
автор: Aqsv
Напишите в Turbo Pascal: b+√(b^2+4ac)/2a - a^3c+b^-2
Ответы
Автор ответа:
9
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.
Похожие вопросы
Предмет: Английский язык,
автор: ТаисияЕфанова
Предмет: Английский язык,
автор: Малинка3233543
Предмет: Русский язык,
автор: Chahel
Предмет: Математика,
автор: yanaya44
Предмет: Английский язык,
автор: margnka2017