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

Если элемент второго массива больше соответствующего элемента первого массива, то поменять элементы местами

18.04.2017, 19:13. Показов 1321. Ответов 1
Метки нет (Все метки)

Заданные два числовых массива X(N) и Y(N) преобразуйте их по правилу: для каждой пары большее из xi и yi примите в качестве нового значения xi , а меньшее — в качестве нового значения yi . Выведите исходные и преобразованные массивы.
__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
18.04.2017, 19:13
Ответы с готовыми решениями:

Если максимальный элемент массива А больше минимального элемента массива В, поменять данные элементы местами
Задача, вроде, не сложная, может есть у кого готовая такая? Мне её на разбор надо.. Помогите,...

Поменять местами минимальный элемент первого массива и максимальный элемент второго массива
Нужно создать два массива( например A и D) состоящих из 10 элементов заданных случайным образом на...

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

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

1
1754 / 1346 / 1407
Регистрация: 28.10.2016
Сообщений: 4,267
19.04.2017, 01:12 2
Лучший ответ Сообщение было отмечено Allena_101 как решение

Решение

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
type mas = array [1..100] of integer;
procedure vivod(a:mas; n:byte);
var i:byte;
begin
  for i:=1 to n do
    write(a[i],' ');
  writeln;
end;
 
procedure swap(var a,b:integer);
var x:integer;
begin
  x:=a; a:=b; b:=x;
end;
 
var x,y:mas;
    i,n:byte;
begin
  randomize;
  write('n = '); readln(n);
  for i:=1 to n do begin
    x[i]:=random(41)-20;
    y[i]:=random(41)-20;
  end;
  write('X: '); vivod(x,n);
  write('Y: '); vivod(y,n);
  for i:=1 to n do
    if x[i]<y[i] then swap(x[i],y[i]);
  write('new X: '); vivod(x,n);
  write('new Y: '); vivod(y,n);
end.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
19.04.2017, 01:12
Помогаю со студенческими работами здесь

Получите новый массив, каждый элемент которого равен удвоенному числу соответствующего элемента исходного массива, если он больше числа A...
2)Сформировать массив, содержащий n элементов, с помощью чисел, введенных с клавиатуры. Получите...

Если элементы массива расположены по возрастанию, то после первого положительного элемента вставить элемент равный сумме всех элементов массива
Если элементы массива расположены по возрастанию, то после первого положительного элемента вставить...

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

Поменять местами D2DFE из первого массива и R2D2 из второго массива, используя несколько разных способов адресации
Ассемблер Даны два массива z1 DW 0EFE1 D2DFE 32ABC z2 DW 1EFEA A2EF R2D2 Не за бесплатно


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

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

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