Задание 5 Вариант 3 Самостоятельная работа 5 ГДЗ Рабочая тетрадь Босова 11 класс (Информатика)
Решение #1
![Изображение 5. Напишите программу. Коэффициентами квадратного уравнения ax^2 + bx + с = 0 могут быть любые элементы соответствующих целочисленных массивов: A[1…5], B[1…7], C[1…10]....](/reshebniki/informatika/11/WBbosova/images1/sam5/3/5.png "Изображение ответа 5. Напишите программу. Коэффициентами квадратного уравнения ax^2 + bx + с = 0 могут быть любые элементы соответствующих целочисленных массивов: A[1…5], B[1…7], C[1…10]....")
Рассмотрим вариант решения задания из учебника Босова, Босова, Аквилянов 11 класс, Бином:
5. Напишите программу. Коэффициентами квадратного уравнения ax^2 + bx + с = 0 могут быть любые элементы соответствующих целочисленных массивов: A[1…5], B[1…7], C[1…10]. Подсчитайте, сколько из этих 350 уравнений имеют два различных вещественных корня. Запишите текст программы.
Два разных вещественных корня имеет квадратное уравнение, дискриминант которого больше 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.
Значения элементов массива можно менять по своему усмотрению.
Похожие решебники
Популярные решебники 11 класс Все решебники
*размещая тексты в комментариях ниже, вы автоматически соглашаетесь с пользовательским соглашением