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

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

16.01.2013, 20:37. Показов 1538. Ответов 1
Метки нет (Все метки)

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

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

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

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

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

1
Фрилансер
3417 / 2814 / 3000
Регистрация: 08.02.2012
Сообщений: 8,494
Записей в блоге: 1
17.01.2013, 09:24 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
39
40
41
42
Uses Crt;
Var A,B:array[1..10,1..10] of integer;
    i,j,n,m:byte;
Function F(n:integer):integer;
Var s,t:integer;
Begin
    n:=abs(n);
    s:=n mod 10;
    n:=n div 10;
    t:=0;
    While n>0 do
    Begin
      t:=n mod 10;
      n:=n div 10;
    End;
    F:=s+t;
End;
Begin
    ClrScr;Randomize;
    write('Кол-во строк: ');readln(n);
    write('Кол-во столбцов: ');readln(m);
    For i:=1 to n do
    Begin
      For j:=1 to m do
      Begin
        A[i,j]:=random(401)+100;
        write(A[i,j]:4);
      End;
      writeln;
    End;
    writeln('Полученная матрица');
    For i:=1 to n do
    Begin
      For j:=1 to m do
      Begin
        B[i,j]:=F(A[i,j]);
        write(B[i,j]:3);
      End;
      writeln;
    End;
    readln;
End.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
17.01.2013, 09:24
Помогаю со студенческими работами здесь

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

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

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

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


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

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

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