Паскаль (с использованием операторов if и elsе) напишите программу, которая по введенным с клавиатуры числам e, f, g, h и w будет вычислять значение коэффициента a, b и c квадратного уравнения по предлагаемым формулам, а также значение дискриминанта d, решать это квадратное уравнение и выдавать результаты его решения. a=7e-f/2, b=√((g+e)^2+h/w), c=|w^2-h| sina, где дискриминант d=b^2-4ac; корни уравнения x_1,2=(-b±√d)/2a. отладьте программу на следующем примере: е=2, f= -5, g=-5, h=3, w=2 a=16.5 b=3.24037 c=-0.711785 d=57.4778 x1=0.131547 x2=-0.327933
182
273
Ответы на вопрос:
Var e,f,g,h,w,a,b,c,d: real; begin readln(e); readln(f); readln(g); readln(h); readln(w); a: =7*e-f/2; b: =sqrt(sqr(g+e)+h/w); c: =abs(sqr(w)-h)*sin(a); d: =sqr(b)-4*a*c; writeln('a = ',a); writeln('b = ',b); writeln('c = ',c); writeln('d = ',d); if(d< 0) then writeln('корней нет') else if(d = 0) then writeln('x = ',-b/(2*a)) else begin writeln('x1 = '+sqrt(d))/(2*a)); writeln('x2 = '-sqrt(d))/(2*a)); end; end.
Var k,a,b,m,v: real; begin; readln(a); //ввод значений readln(b); readln(k); m: =k; //сохраняем значение цены k: =k*100; //так как в по условию вводятся сантиметры a: =a/12; //делим ширину на ширину рулона, получаем кол-во рулонов b: =b/k; //делим высоту на высоту рулона, получаем кол-во рулонов if a> =b then //чтобы точно хватило на всё begin; v: =m*a; //финальная стоимость=цена на 1 рулон*рулоны writeln(v); end else begin; v: =m*b; //аналогично writeln(v); end; end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
destroyer080013.12.2020 03:58
-
аzат24.06.2021 09:21
-
vbbbbb28.06.2021 10:00
-
KeKoLolist20.06.2023 15:13
-
MaxTwAiNer1224.12.2022 11:49
-
AngelinaMalik0518.03.2021 09:25
-
OkumRin20.02.2023 02:37
-
ekaterinapsncen25.01.2021 00:12
-
leralerav16.02.2021 17:07
-
Hyies16.04.2022 03:52
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.