Question

Заполните случайными числами в диапазоне от 1 до 50 массив B [1:20]. Какое количество раз встречается число 4 в данном массиве? Вывести сообщение на экран: Число 4 встречается в массиве _____ раз. Если такого числа нет, то вывести на экран сообщение об этом. ПОЖАЛУЙСТА)

Answer 1

// PascalABC.Net

var a: array [1..20] of integer;

i, count: integer;

begin

   for i := 1 to 20 do

   begin

       a[i] := random(1, 50);

       write(a[i]:4);

   end;

   writeln();

   

   count := 0;

   for i := 1 to 20 do

   begin

       if a[i] = 4 then

           inc(count);

   end;

   writeln('Число 4 встречается в массиве ', count, ' раз.');

end.

Answer 2

Для решения данной задачи можно использовать следующий алгоритм: 1. Создать пустой массив b. 2. Заполнить массив b случайными числами в диапазоне от 1 до 50. 3. Создать переменную count и присвоить ей значение 0. Эта переменная будет служить для подсчета количества встреч числа 4. 4. Пройти циклом по каждому элементу массива b. 5. Внутри цикла проверить, является ли текущий элемент равным 4. 6. Если элемент равен 4, увеличить переменную count на 1. 7. После завершения цикла, проверить значение переменной count. 8. Если значение count равно 0, вывести на экран сообщение "Число 4 не встречается в массиве". 9. Если значение count больше 0, вывести на экран сообщение "Число 4 встречается в массиве count раз", где вместо count подставить значение переменной count. Ниже представлен код на языке Python, реализующий данный алгоритм: ```python import random b = [] for i in range(20): b.append(random.randint(1, 50)) count = 0 for num in b: if num == 4: count += 1 if count == 0: print("Число 4 не встречается в массиве") else: print("Число 4 встречается в массиве", count, "раз") ``` После запуска данного кода, на экран будет выведено сообщение о количестве встреч числа 4 в массиве b.