Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/5: Рейтинг темы: голосов - 5, средняя оценка - 5.00
Larus15
0 / 0 / 0
Регистрация: 16.12.2013
Сообщений: 74
1

В массиве найти количество положительных элементов в каждой строке

16.02.2014, 23:10. Просмотров 923. Ответов 1
Метки нет (Все метки)

2) В массиве найти количество положительных элементов в каждой строке Вывести минимальное количество и номер строки, в которой это количество находится
0
Лучшие ответы (1)
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
16.02.2014, 23:10
Ответы с готовыми решениями:

Найти количество положительных элементов в каждой строке файла
Дан текстовый файл, содержащий целые числа 1) Найти количество положительных...

Функции: в каждой строке матрицы найти количество положительных элементов
Дана матрица размерностью nxm. Требуется написать программу, которая в каждой...

Найти количество положительных и четных элементов в каждой строке матрицы
Дана матрица размерности М*N. найти количество положительных и четных элементов...

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

Найти количество положительных элементов в каждой строке двумерного целочисленного массива
Будьте любезны помогите,пожалуйста решить две задачи. Заранее огромное спасибо...

1
ermolay
3430 / 2369 / 2134
Регистрация: 04.12.2011
Сообщений: 3,965
17.02.2014, 08:41 2
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

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
31
32
33
const
  nmax = 20;
 
var
  a: array[1..nmax, 1..nmax] of integer;
  n, m, i, j, min, i_min, k: integer;
 
begin
  randomize;
  repeat
    write('Введите размеры массива n, m (n, m < 21): ');
    readln(n, m);
  until (n in [1..nmax]) and (m in [1..nmax]);
  min := m; i_min := 1;
  writeln('Исходный массив:');
  for i := 1 to n do
  begin
    k := 0;
    for j := 1 to m do
    begin
      a[i, j] := random(199) - 99;
      write(a[i, j]:4);
      if a[i, j] > 0 then inc(k);
    end;
    writeln('   Положительных: ', k);
    if k < min then begin
      min := k;
      i_min := i;
    end;
  end;
  writeln('Минимум положительных в ', i_min, ' строке');
  readln;
end.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
17.02.2014, 08:41

В двумерном массиве найти минимальный элемент в каждой строке и количество элементов равных 1
Дан двумерный массив С(20,30). Найти минимальный элемент в каждой строке и...

Подсчитать количество положительных элементов в каждой строке
Подсчитать количество положительных элементов в каждой строке матрицы размером...

Подсчитать количество положительных элементов в каждой строке матрицы
Программа подсчета количества положительных элементов в каждой строке матрицы....


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

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

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