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

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

13.10.2012, 09:53. Показов 2663. Ответов 1
Метки нет (Все метки)

Даны два массива Ak и Bk размера N. Сформировать третий массив Ck, элементы которого получаются путем сложения соответствующих элементов массива Ak и Bk. Отсортировать массив Ck по возрастанию и найти минимальный элемент.
__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь
2
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
13.10.2012, 09:53
Ответы с готовыми решениями:

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

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

В третий массив разместить только максимальные элементы из соответствующих позиций двух исходных массивов
Объявить три одномерных массива целых чисел одинаковой размерностью. Заполнить первый и второй...

Сформировать новый массив, элементы которого являются суммой элементов исходных массивов
2)Даны два массива A(N) и B(N). Сформировать новый массив, элементы которого являются суммой...

1
3028 / 1914 / 1649
Регистрация: 30.04.2011
Сообщений: 3,060
13.10.2012, 10:04 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
43
44
45
46
Uses crt;
Var
  a,b,c: Array[1..100] of Integer;
  n,k,j,tmp,min: Integer;
BEGIN
Clrscr;
Writeln('Введите кол-во элементов: '); Readln(n);
For k:=1 to n do
begin
  a[k]:=Random(50);
  b[k]:=Random(50);
end;
Writeln('1 массив:');
For k:=1 to n do
Write(a[k],' ');
Writeln;
Writeln('2 массив:');
For k:=1 to n do
Write(b[k],' ');
Writeln;
Writeln('3 массив:');
For k:=1 to n do
begin
  c[k]:=a[k]+b[k];
  Write(c[k],' ');
end;
For k:=n-1 downto 1 do
For j:=1 to n-1 do
If c[j]>=c[j+1] Then
begin
  tmp:=c[j];
  c[j]:=c[j+1];
  c[j+1]:=tmp;
end;
min:=10000;
Writeln;
Writeln('Отсортированный массив:');
For k:=1 to n do
begin
  Write(c[k],' ');
  If c[k]<min Then min:=c[k];
end;
Writeln;
Writeln('Минимальный элемент: ',min);
Readln
END.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
13.10.2012, 10:04
Помогаю со студенческими работами здесь

Поместить в третий массив среднее арифметическое соответствующих элементов исходных массивов
1.Создать два одномерных массива длины 5. Элементы массива вводятся списком. Поместить в третий...

Поместить в третий массив произведение соответствующих элементов двух исходных массивов
Создать два одномерных массива длины 5. Элементы массива вводятся списком. Поместить в третий...

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

Получите третий массив по правилу: каждый элемент нового массива равен сумме квадратов соответствующих элементов исходных
два массива, по 14 элементов в каждом, с помощью датчика случайных чисел. Получите третий массив...

Создать новый массив, элементами которого являются произведения соответствующих элементов исходных
Решите пожалуйста, заранее спасибо!! Дан целочисленный массив А(п) , В(п). Создать новый массив...

Сформировать третий массив из элементов двух исходных
Даны два одномерных массива одинаковой длины. Получить третий массив такой же размерности, каждый...


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

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

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