Форум программистов, компьютерный форум, киберфорум
Наши страницы
PascalABC.NET
Войти
Регистрация
Восстановить пароль
 
Slakerson
0 / 0 / 0
Регистрация: 19.11.2015
Сообщений: 9
1

Определить и напечатать номер строки введенной матрицы, в котором больше парных элементов

19.11.2015, 11:50. Просмотров 179. Ответов 1
Метки нет (Все метки)

С клавиатуры ввести прямоугольную матрицу целых чисел ( максимальная размерность матрицы - 20х20 элементов). Определить и напечатать номер строки введенной матрицы , в котором больше парных элементов

матрицу я сделал а с парными элементами у меня проблема

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
const
  N = 20; M = 20;
 
var
  a: array[1..N, 1..M] of integer;
  i, j: byte;
 
 
begin
  randomize;
  for i := 1 to N do 
  begin
    for j := 1 to M do 
    begin
      a[i, j] := random(9);
      write(a[i, j], ' ');
    end;
    writeln;
  end;
  
  
  
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
19.11.2015, 11:50
Ответы с готовыми решениями:

Определить номер столбца матрицы G(6,, в котором меньше всего нулей.
1. Определить номер столбца матрицы G(6,8), в котором меньше всего нулей.

Определить значение максимального элемента матрицы и его координаты (номер строки и номер столбца)
Определить значение максимального элемента матрицы и его координаты (номер строки и номер столбца).

Определить номер столбца, в котором расположен минимальный элемент третьей строки массива
21 Дан двухмерный массив. Определить номер столбца, в котором расположен минимальный элемент...

Вывести на экран номер строки в котором максимальное количество отрицательных элементов
Какие сторонки заменить ,что бы вывести на экран номер строки в котором максимальное количество...

Определить номер строки и номер столбца матрицы
Определить номер строки и номер столбца матрици Х(5, 6), на пересечении которых находиться...

1
ZX Spectrum-128
Модератор
Эксперт Pascal/Delphi
3882 / 2864 / 3639
Регистрация: 05.06.2014
Сообщений: 14,080
19.11.2015, 21:18 2
(С) Kodzaev

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
const
  n = 20;
 
var
  x: Array[1..n, 1..n] of Integer;
  i, j, max, t, st: Integer;
 
begin
  randomize;
  Writeln('Матрица:');
  t := 0;
  for i := 1 to n do
  begin
    for j := 1 to n do
    begin
      x[i, j] := Random(n);
      if not odd(x[i, j] ) Then 
        Inc(t);
      Write(x[i, j]:4);
    end;
    if t > max Then
    begin
      max := t;
      st := i;
    end;
    t := 0;
    Writeln
  end;
  Writeln('Строка с наиб. кол-вом четных: ', st);
end.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
19.11.2015, 21:18

Найти номер столбца матрицы, в котором находится наименьшее количество положительных элементов
Найти номер столбца массива размером n*m, в котором находится наименьшее количество положительных...

Определить: номер столбца в котором находится самая длинная серия одинаковых элементов
1) Дано: целочисленная прямоугольная матрица. Определить: номер столбца в котором находится самая...

Найти номер строки массива размером М на Н, в котором находится наибольшее количество четных элементов
Найти номер строки массива размером МхN, в котором находится наибольшее количество четных...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru