составьте программу, которая заполняет массив b [1..8] ...
составьте программу, которая заполняет массив b [1..8] случайными целыми числами в диапазоне от 1 до 10 и находит количество пар элементов с четными значениями.
помогитееееееее
Есть ответ
17.12.2022
408
Ответ
var a: array[1..10] of integer; //Массив целочисленных элементов а i, n: integer; //n - количество элементов, равных 1begin n:= 0; //Обнуляем счетчик write('Исходный массив: '); for i:= 1 to 10 do {Заполняем массив случайными элементами от 1 до 10, распечатываем его и считаем количество элементов, равных 1} begin a[i]:= random(3); write(a[i], ' '); if a[i] = 1 then n:= n + 1; end; writeln; writeln('Количество элементов, равных 1: ', n);end.
Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
Просто нажмите на кнопку "Подарить".
17.12.2022