Задание 5 Вариант 2 Самостоятельная работа 5 ГДЗ Рабочая тетрадь Босова 11 класс (Информатика)

1. Напишите программу. Коэффициентами квадратного уравнения $$ax^2+bx+c=0$$ могут быть любые элементы соответствующих целочисленных массивов: $$A[1..5]$$, $$B[1..7]$$, $$C[1..10]$$. Подсчитайте, сколько из этих 350 уравнений имеют два различных вещественных корня. Запишите текст программы.

Для квадратного уравнения $$ax^2+bx+c=0$$ два различных вещественных корня существуют тогда и только тогда, когда $$D=b^2-4ac>0$$.

Нужно перебрать все возможные значения коэффициентов из массивов:

• $$a \in A[1..5]$$ — 5 вариантов;
• $$b \in B[1..7]$$ — 7 вариантов;
• $$c \in C[1..10]$$ — 10 вариантов.

Всего уравнений:

$$5 \cdot 7 \cdot 10 = 350.$$

Программа должна перебрать все тройки $$a, b, c$$, вычислить дискриминант и подсчитать, сколько раз выполняется условие $$D>0$$.

program s5_v2_5;
var
  a, b, c, d, k: integer;
begin
  k := 0;
  for a := 1 to 5 do
    for b := 1 to 7 do
      for c := 1 to 10 do
      begin
        d := b * b — 4 * a * c;
        if d > 0 then
          k := k + 1;
      end;
  writeln(k);
end.

Ответ

Программа подсчитывает количество уравнений с двумя различными вещественными корнями по условию $$b^2-4ac>0$$.