3 / 3 / 0
Регистрация: 12.04.2010
Сообщений: 39
1

Сформировать одномерный массив, каждый элемент которого равен сумме положительных элементов в соответствующем столбце двухмерного массива

12.04.2010, 19:12. Показов 1702. Ответов 1
Метки нет (Все метки)

Дан двухмерный массив целых чисел.
Сформировать одномерный массив, каждый элемент которого равен сумме положительных элементов в соответствующем столбце двухмерного массива, кратных 4 или 5.
__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
12.04.2010, 19:12
Ответы с готовыми решениями:

Сформировать одномерный массив, каждый элемент которого равен сумме отрицательных нечетных элементов
2. Дан двумерный массив размером 5 x 6. Сформировать одномерный массив, каждый элемент которого...

Даны 2 массива. Получить 3 массив, каждый элемент которого равен сумме соотвестветствующих элементов исходных
2) Даны 2 одномерных массива одинаковой длины.Получить 3 массива такой же размерности,каждый...

Создать массив, каждый элемент которого равен сумме двух предыдущих элементов
Известны два первых элемента массива B: B=4, B=8.Создать массив, каждый элемент которого равен...

Сформировать новый массив: элемент Вк равен сумме элементов массива А с номерами от 1 до K
Помгите пожалуйста. Дан массив А размера N. Сформировать новый массив В того же раз-мера по...

1
1915 / 1065 / 384
Регистрация: 06.12.2008
Сообщений: 2,802
12.04.2010, 19:22 2
Лучший ответ Сообщение было отмечено PARNISH как решение

Решение

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
uses crt;
const n=5;
      m=4;
var a:array[1..100,1..100] of integer;
    b:array[1..100] of integer;
    i,j:integer;
begin
ClrScr;
Randomize;
for i:=1 to n do
 begin
  for j:=1 to m do
   begin
    a[i,j]:=random(20)-10;
    Write(a[i,j]:5);
   end;
  Writeln;
 end;
Writeln;
b[j]:=0;
for j:=1 to m do
 for i:=1 to n do
  if (a[i,j] mod 4=0) or (a[i,j] mod 5=0) then
   b[j]:=b[j]+a[i,j];
for i:=1 to m do
 Write(b[i]:5);
Readln;
end.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
12.04.2010, 19:22
Помогаю со студенческими работами здесь

Дан массив В из N строк произвольной длины.Сформировать массив В,каждый элемент которого равен последнему символу соответствующей строки.
Дан массив В из N строк произвольной длины.Сформировать массив В,каждый элемент которого равен...

Даны целые числа N (>2), A и B. Сформировать и вывести целочисленный массив размера N, первый элемент которого равен сумме всех предыдущих.
Даны целые числа N (>2), A и B. Сформировать и вывести целочисленный массив размера N, первый...

Сформировать из последовательности одномерный массив, каждый элемент которого определяется по правилу
Задана последовательность х={0.12, 0.2, 1, 9.3, 0.5, -4.8, -2.1, 0.5, 1.2, 0.3} Сформировать из нее...

Сформировать вектор , каждый элемент которого является суммой положительных элементов соответствующей строки
Народ! Помогите сделать эту задачу! Сформировать вектор F, каждый элемент которого является суммой...


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

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

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