48

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

02 апреля 2023

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

категория: информатика



46

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.

Знаете ответ?


Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...