profile
Опубликовано 6 лет назад по предмету Информатика от Aqsv

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

  1. Ответ
    Ответ дан RightWay95

     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.

     

     

     

     

     

     

     

Самые новые вопросы