Форум программистов, компьютерный форум, киберфорум
PascalABC.NET
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.75/8: Рейтинг темы: голосов - 8, средняя оценка - 4.75
0 / 0 / 5
Регистрация: 14.11.2014
Сообщений: 40
1

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

16.11.2014, 17:35. Показов 1516. Ответов 1
Метки нет (Все метки)

Ввести с клавиатуры одно или два (в зависимости от варианта) целых числа N и M. Создать динамический двумерный массив размера N*M. Заполнить получившийся массив случайными числами и подсчитать количество отрицательных чисел в столбцах с четным номером.
__________________
Помощь в написании контрольных, курсовых и дипломных работ здесь
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
16.11.2014, 17:35
Ответы с готовыми решениями:

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

Заполнить динамический двумерный массив случайными числами и подсчитать кол-во чисел кратных 5, лежащих на главной диагонали
Ввести с клавиатуры одно число N. Создать динамический двумерный массив N*N. Заполнить...

Создать динамический двумерный массив. Подсчитать количество положительных чисел в строках с нечётными номерами
3)Ввести с клавиатуры два целых числа N и M. Создать динамический двумерный массив размера N*M....

Динамический массив, сумма его отрицательных элементов с чётным порядковым номером
В данном динамическом массиве подсчитать количество отрицательных элементов с чётным порядковым...

1
Эксперт Pascal/Delphi
2380 / 1292 / 1491
Регистрация: 29.08.2014
Сообщений: 4,623
17.11.2014, 07:01 2
Лучший ответ Сообщение было отмечено vanilock как решение

Решение

с 1 столбца (0-столбец не используется)
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
var
  a:array [,] of real;
  i,j,m,n,iKolVo:integer;
begin  
  repeat
   write('n,m=');readln(n,m);
  until (n>0)and (m>0); 
  a:=new real [n+1,m+1];
  iKolVo:=0;
  for i:=1 to n do begin
    for j:=1 to m do begin
      a[i,j]:=random*10-5;
      write(a[i,j]:6:2);
      if (not odd(j)) and (a[i,j]<0) then inc(iKolVo);
    end;
    writeln;
  end;
  writeln('количество отрицательных чисел в столбцах с четным номером=',iKolVo);
end.
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
17.11.2014, 07:01

Задан массив С из 8 вещественных элементов. Подсчитать в нем количество положительных, отрицательных чисел и нулей.
Есть такая задача: Задан массив С из 8 вещественных элементов. Подсчитать в нем количество...

Сформировать массив натуральных чисел из M строк и N столбцов. Подсчитать сумму чисел в чётных столбцах
Сформировать массив натуральных чисел из M строк и N столбцов. Подсчитать сумму чисел в чётных...

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

Найти количество отрицательных чисел, количество нулевых и подсчитать сумму положительных чисел
Т.к. я полный 0 в этом, вынужден обратиться к профи) надеюсь на вашу помощь. 1. Произвести...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2022, CyberForum.ru