Регистрация
relinaro09
18.02.2020 06:32
Информатика
Есть ответ 👍

Запишите соответствующие логические выражения:

191
329
Посмотреть ответы 1

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

ayazhanbeibit5
ayazhanbeibit5
4,5(81 оценок)
Aх^2+вх+с=0var a, b, c, d, x1, x2 : real;   begin  write('a = '); readln(a);   write('b = '); readln(b);   write('c = '); readln(c);   d : = b*b + 4*a*c;   if d=0 then  begin  x1 : = b / (2 * a)  writeln (x1: 3: 3);   end  else  if d> 0 then  begin  x1 : = (- b + sqrt(d) / (2 * a);   x2 : = (- b - sqrt(d) / (2 * a);   writeln (x1: 3: 3, ' ', x2: 3: 3);   end  else  writeln ('нет решения');   end.

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