Задание 10 Вариант 2 Самостоятельная работа 4 ГДЗ Рабочая тетрадь Босова 11 класс (Информатика)
- Напишите программу поиска значения наибольшего отрицательного элемента массива $$B[1..12]$$. Исходный массив заполните случайными целыми числами, принадлежащими промежутку $$[-10; 10)$$. По результатам работы программы заполните таблицу:
$$B[1] =$$ $$B[4] =$$ $$B[7] =$$ $$B[10] =$$ $$B[2] =$$ $$B[5] =$$ $$B[8] =$$ $$B[11] =$$ $$B[3] =$$ $$B[6] =$$ $$B[9] =$$ $$B[12] =$$ Наибольший отрицательный элемент равен: ____________
Нужно найти наибольший отрицательный элемент массива из 12 чисел. Для этого сначала заполняем массив случайными целыми числами из промежутка $$[-10; 10)$$, затем просматриваем все элементы и среди отрицательных выбираем максимальный.
program s4_v2_10;
const
n = 12;
var
b: array[1..n] of integer;
i, otmax: integer;
begin
otmax := -100; { заведомо меньше любого допустимого }
writeln(‘ввод массива’);
randomize;
for i := 1 to n do
begin
b[i] := random(20) — 10;
writeln(‘b[‘, i, ‘]=’, b[i])
end;
for i := 1 to n do
if (b[i] < 0) and (b[i] > otmax) then otmax := b[i];
writeln(‘otmax=’, otmax)
end.
По результатам работы программы получаем значения массива:
| $$B[1] = -6$$ | $$B[4] = -7$$ | $$B[7] = 0$$ | $$B[10] = 4$$ |
| $$B[2] = -8$$ | $$B[5] = 8$$ | $$B[8] = 9$$ | $$B[11] = -7$$ |
| $$B[3] = -10$$ | $$B[6] = 7$$ | $$B[9] = 0$$ | $$B[12] = 7$$ |
Среди отрицательных элементов $$-6, -7, -8, -10, -7$$ наибольший равен $$-6$$.
Ответ
Наибольший отрицательный элемент равен $$-6$$.
