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

Z =…….
Количество элементов, превышающих Z, равно…
program s4_v1_9;
var
a: array[0..10] of real;
i, k: integer;
z: real;
begin
k := 0;
write(‘z=’);
readln(z);
writeln(‘ввод массива’);
for i := 0 to 10 do
begin
read(a[i]);
if a[i] > z then k := k + 1
end;
writeln(‘Количество элементов > z =’, k);
end.
Z=20
Количество элементов, превышающих Z, равно: 3

Составим программу, которая последовательно просматривает элементы массива, сравнивает каждый из них с числом $$Z$$ и увеличивает счётчик $$k$$, если элемент больше $$Z$$.

program s4_v1_9;
var
  a: array[0..10] of real;
  i, k: integer;
  z: real;
begin
  k := 0;
  write(‘z=’);
  readln(z);
  writeln(‘ввод массива’);
  for i := 0 to 10 do
  begin
    read(a[i]);
    if a[i] > z then k := k + 1
  end;
  writeln(‘Количество элементов > z =’, k);
end.

Проверим программу на массиве $$A = \{7, 25, 4.5, 0, 17, 61, -10, 0, 1, -4, 22\}$$ при $$Z = 20$$.

Элементы, превышающие $$20$$: $$25, 61, 22$$.

Их количество равно $$3$$.

Ответ

$$Z = 20$$
Количество элементов, превышающих $$Z$$, равно $$3$$.