Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.89/9: Рейтинг темы: голосов - 9, средняя оценка - 4.89
2 / 2 / 0
Регистрация: 13.10.2012
Сообщений: 15
1

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

13.10.2012, 09:53. Просмотров 1690. Ответов 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
3020 / 1908 / 1647
Регистрация: 30.04.2011
Сообщений: 3,054
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® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.