Есть ответ 👍

30 ! написать программу для определения количества корней квадратного уравнения по коэффициентам a, b, c

141
161
Посмотреть ответы 3

Ответы на вопрос:

atoko
4,4(49 оценок)

// pascalabc.net 3.1, сборка 1218 от 12.04.2016 begin   var a,b,c: real;   writeln('введите коэффициенты квадратного уравнения (a b c)');   read(a,b,c);   if a=0 then begin       writeln('а=0 делает уравнение линейным');       if b=0 then writeln('корней нет')       else writeln('один корень ')       end   else begin       var d: =b*b-4*a*c;       if d< 0 then writeln('нет действительных корней')       else           if d=0 then writeln('один корень')           else writeln('два корня')       end end.

program yrav;

var

  a,b,c,d,x1,x2,x: real;

begin

  writeln('введите коэффиценты квадратного уравнения');

  readln(a,b,c);

    d: =b*b-4*a*c;

    if d< 0 then writeln('корней нет');

    if (d> 0) and (a< > 0)and (b< > 0)and (c< > 0) then

    begin

        x1: =(-b+sqrt(d))/(2*a);

        x2: =(-b-sqrt(d))/(2*a);

        writeln('x1= ',x1: 6: 3,'    x2= ',x2: 6: 3);

    end;

  if  (a=0)and(b< > 0)and(c< > 0) then

  begin

      x=-c/b;

      writeln('один корень уравнения х= ',x: 6: 3);

  end;

  if (b=0)and(c< 0) and(a< > 0) then

  begin

    x1=sqrt(-c/a); x2=-sqrt(-c/a);

    writeln('x1= ',x1: 6: 3,'   x2= ' ,x2: 6: 3);

  end

  else writeln('корней нет! ');

  if (a< > 0) and(b< > 0)and(c=0) then

  begin

    x1: =0;

    x2: =-b/a;

    writeln('x1= ', x1: 6: 3,'        x2= ',x2: 6: 3);

  end;

end.

sweta210
4,5(44 оценок)

Вцелом к профессиональным навыкам системного программиста можно отнести языки программирования, методы сборки новых программ из готовых частей, трансляторы, программы отладки в терминах высокоуровневых языков, библиотеку готовых заготовок. еще одно новой профессией является операционщик – разработчик операционных систем. данные системы являются сердцем программного обеспечения компьютера. именно они вводом в компьютер информации, которая поступает с клавиатуры или дисков, помещением выходных и входных данных на запоминающих устройствах, а еще манипуляцией с ними. операционные системы с каждым годом все более усложняются, ведь вырастают потребности массового пользователя, а также требования техники и науки. именно поэтому от специализации системного программирования отделилась новая специализация – разработчик операционных систем или операционщик.а объединения нескольких вычислительных машин, возникновение и локальных сетей потребовало от операционных систем исполнения все новых функций. в связи с этим возникла и новая специальность – программист-сетевик. специалисты, которые занимаются разработкой сетевых программ, должны хорошо разбираться в системах протоколов, которые приняты для данной сети, правилах формирования адресов различных точек сети, способах транспортировки информации и прочем. программисты-сетевики, профессионалы своего дела, могут сжимать данные на входе, а также расшифровывать ее на выходе.

Реши свою проблему, спроси otvet5GPT

  • Быстро
    Мгновенный ответ на твой вопрос
  • Точно
    Бот обладает знаниями во всех сферах
  • Бесплатно
    Задай вопрос и получи ответ бесплатно

Популярно: Информатика

Caktus Image

Есть вопросы?

  • Как otvet5GPT работает?

    otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
  • Сколько это стоит?

    Проект находиться на стадии тестирования и все услуги бесплатны.
  • Могу ли я использовать otvet5GPT в школе?

    Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
  • В чем отличия от ChatGPT?

    otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.

Подпишись на наш телеграмм канал

GTP TOP NEWS