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

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

Два различных вещественных корня квадратное уравнение имеет тогда и только тогда, когда его дискриминант положителен:

$$D=b^2-4ac>0$$

Нужно перебрать все возможные значения коэффициентов из массивов $$A[1..5]$$, $$B[1..7]$$ и $$C[1..10]$$ и посчитать, сколько раз выполняется условие $$D>0$$.

program s5_v3_5;
var
  a: array[1..5] of integer = (1, 3, -2, 4, 6);
  b: array[1..7] of integer = (2, 3, -2, 7, 4, -5, 9);
  c: array[1..10] of integer = (3, -3, 1, 5, -2, 6, -4, 4, 10, -9);
  i, j, y, d, k: integer;
begin
  k := 0;
  for i := 1 to 5 do
    for j := 1 to 7 do
      for y := 1 to 10 do
      begin
        d := sqr(b[j]) — 4 * a[i] * c[y];
        if d > 0 then inc(k);
      end;
  writeln(‘Количество уравнений, имеющих два корня = ‘, k);
end.

В программе три вложенных цикла перебирают все $$5 \cdot 7 \cdot 10 = 350$$ уравнений. Если дискриминант положителен, счётчик $$k$$ увеличивается на 1.

Ответ: программа выше; она подсчитывает количество уравнений с двумя различными вещественными корнями.