Pascal-abc.net , прошу с не сложной . условия: заполнить двумерный массив a случайными числами и построить одномерный массив b, в каждый елемент которого записано: число елементов каждого стольбца двухмерного массива, значения которых равны заданному значению. вопросы вот где " и построить одномерный массив b, в каждый елемент которого записано: число елементов каждого стольбца двухмерного массива, значения которых равны заданному значению." как это построить? у меня в голове нету абсолютно никаких мыслей. прошу .

Заводите счетчик, допустим, к, который  считает к-во элементов столбцов, удовлетворяющих условию. изначально к=0. for j: =1 to n do   begin for i: =1 to m do   if a[i,j] = c (где с - заданное значение)     then k++;   b[j]: =k; k: =0;   end; обратите внимание на индексацию! двумерный массив мы должны пройти не горизонтально (по строкам), как обычно, а по столбцам.

Подсчитаем количество чётных чисел. в разряде десятков тысяч этого числа может стоять любое из цифр  {2,5,8} (то есть всего 3 варианта). в разряде тысяч, сотен, десятков могут находится любые из цифр {8,5,2,0} (для каждого разряда по 4 варианта). в разряде единиц могут   стоять только цифры из множества {0,5,8}  (то есть 3 варианта).  применяя известную комбинаторную формулу, считаем, что всего вариантов 3*4*4*4*3=396. подсчитаем количество возможных нечётных чисел. ситуация со всему , кроме единиц аналогично. а вот в разряде единиц может стоять только цифры из множества {5}  (один вариант). таким образом количество возможных нечётных чисел равна 3*4*4*4*1=192. ответ: 396 чётных и 192 нечётных

//язык c++ #include < iostream> int main() {     const int size = 5;     int numbers[size];     int sum = 0;     for (int i = 0; i < size; i++)     {         std: : cout < < "enter " < < i + 1 < < " number: ";         std: : cin > > numbers[i];         sum += numbers[i];     }     std: : cout < < "\narifmetical mean: " < < (double)sum / size;     return 0; } //example: 1 2 3 4 5 => output: 3