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

Создать новый массив, элементами которого являются суммы цифр каждого числа старого массива

08.01.2014, 15:27. Показов 2423. Ответов 1
Метки нет (Все метки)

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

Создать новый массив, элементами которого являются суммы первой и последней цифры каждого числа старого массива
Дан двумерный массив, который содержит не более 10 строк и не более 10 столбцов. Создать новый...

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

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

Создать новый массив, элементами которого являются суммы делителей каждого числа старого массива
Дан двумерный массив, который содержит не более 10 строк и не более 10 столбцов. Создать новый...

1
3450 / 2388 / 2135
Регистрация: 04.12.2011
Сообщений: 3,966
08.01.2014, 15:42 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
34
35
36
37
38
const
  nmax=10;
var
  a, b: array[1..nmax,1..nmax] of integer;
  n,m,i,j,x: integer;
begin
  repeat
    write('Ââåäèòå n, m (n<=10, m<=10): ');
    readln(n,m);
  until (n in [1..10]) and (m in [1..10]);
  writeln('Èñõîäíûé ìàññèâ:');
  for i:=1 to n do
  begin
    for j:=1 to m do
    begin
      a[i,j]:=random(999)+1;
      write(a[i,j]:4);
    end;
    writeln;
  end;
  writeln('Ïîëó÷åííûé ìàññèâ:');
  for i:=1 to n do
  begin
    for j:=1 to m do
    begin
      x:=0;
      while a[i,j]>0 do
      begin
        x:=x+a[i,j] mod 10;
        a[i,j]:=a[i,j] div 10;
      end;
      b[i,j]:=x;
      write(b[i,j]:4);
    end;
    writeln;
  end;
  readln;
end.
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
08.01.2014, 15:42
Помогаю со студенческими работами здесь

Создать новый массив, элементами которого являются суммы цифр каждого числа старого массива
Дан одномерный массив, который содержит не более 40 целых чисел. Создать новый массив, элементами...

Создать новый массив, элементами которого являются суммы цифр каждого числа старого массива
Дан двумерный массив, который содержит не более 10 строк и не более 10 столбцов. Создать новый...

Создать новый массив, элементами которого являются суммы цифр каждого числа старого массива
Дан двумерный массив, который содержит не более 10 строк и не более 10 столбцов. Создать новый...

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


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

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

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