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

В двухмерном массиве вычислить частное от деления суммы всех положительных элементов на сумму всех отрицательных элементов.

03.11.2013, 23:22. Показов 1150. Ответов 2
Метки нет (Все метки)

Ввести двухмерный массив поэлементно с помощью клавиатуры или получить
его, используя генератор случайных чисел. Двухмерный массив может быть
целочисленного или вещественного типа. Количество элементов в двухмерном массиве
должна быть не менее десяти.
Вывести на экран монитора исходный двухмерный массив в виде таблицы чисел.
Выполнить необходимые преобразования над исходным двухмерным массивом,
а также выполнить необходимые вычисления.
Вывести на экран монитора преобразованный двухмерный массив в виде
таблицы чисел, а также вывести результаты вычислений.
Вот мой пример: В двухмерном массиве вычислить частное от деления суммы всех положительных
элементов на сумму всех отрицательных элементов.
__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
03.11.2013, 23:22
Ответы с готовыми решениями:

В двухмерном массиве вычислить частное от деления произведения всех положительных элементов на произведение всех отрицательных элементов
В двухмерном массиве вычислить частное от деления произведения всех положительных элементов на...

Вычислить частное от деления суммы положительных элементов матрицы на сумму всех отрицательных
В двухмерном массиве вычислить частное от деления суммы всех положительных элементов на сумму всех...

В двумерном массиве вычислить частное от деления произведения всех gоложительных элементов на произведение всех отрицательных элементов
В двухмерном массиве вычислить частное от деления произведения всех положительных элементов на...

Массивы: определение частного от деления суммы всех положительных элементов на количество всех отрицательных элементов массива
Составьте алгоритм определения частного от деления суммы всех положительных элементов на количество...

2
5 / 5 / 12
Регистрация: 12.09.2013
Сообщений: 156
04.11.2013, 00:05 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
Program xxx;
var
a:array[1..3,1..2] of real;
x,sum1, sum2:real;
j,i:integer;
begin
for i:=1 to 3 do
begin
for j:=1 to 2 do begin
write('VVEDI a[',i,j, '] ');
read(a[i,j]);
end;
end;
For i:=1 to 3 do begin
For j:=1 to 2 do begin
if (a[i,j]>0)then
sum1:=sum1+a[i,j]
else
sum2:=sum2+a[i,j];
end;
end;
for i:=1 to 3 do begin
for j:=1 to 2 do begin
x:=sum1/sum2;
writeln('sum1/sum2= ',x);
end;
end;
end.
как то так вроде бы но пусть если что поправлят меня
0
Супер-модератор
6081 / 2821 / 1298
Регистрация: 04.03.2013
Сообщений: 5,736
Записей в блоге: 1
04.11.2013, 00:07 3
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

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
const
  n = 5; {строки} 
  m = 6; {столбцы}
var
  a : array[1..n, 1..m] of integer; {двумерный массив}
  i, j : byte; 
  sp, sn : integer;
 
begin
  sp := 0; sn := 0;
  {заполнение матрицы случайными числами и вывод}
  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]:4);
      if a[i,j] < 0 then sn := sn + a[i,j];
      if a[i,j] > 0 then sp := sp + a[i,j];
    end;
    writeln
  end;
  {вывод результатов}
  writeln('частное равно: ', (sp / sn):6:2);
  readln    
end.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
04.11.2013, 00:07
Помогаю со студенческими работами здесь

В двухмерном массиве вычислить сумму отрицательных элементов всех нечетных строк
Помогите плиз сделать прогу. 1. Ввести двухмерный массив поэлементно с помощью клавиатуры или...

Массивы: Определить частное от деления суммы положительных элементов массива на модуль суммы отрицательных элементов
Всем привет, учусь в 9-ом классе. Помогите решить 3 задачи, пожалуйста. 1) Известны данные о...

В массиве B(n), найти сумму всех положительных и произведение всех отрицательных элементов.
В массиве B(n), найти сумму всех положительных и произведение всех отрицательных элементов....

Определите частное от деления суммы положительных элементов массива на модуль суммы отрицательных элементов
1.определите частное от деления суммы положительных элементов массива на модуль суммы отрицательных...


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

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

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