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

В первом одномерном массиве найти все нечетные элементы, во втором одномерном массиве найти все четные элементы и из них сформировать массив

13.02.2014, 16:05. Показов 1779. Ответов 9
Метки нет (Все метки)

1. Ввести одномерный массив используя генератор случайных чисел. Одномерный массив может быть
целочисленного или вещественного типа. Количество элементов в одномерном массиве
должно быть не менее десяти.
2. Вывести на экран монитора исходный одномерный массив в виде строки чисел.
3. Выполнить необходимые преобразования над исходным одномерным массивом,
а также выполнить необходимые вычисления.
4. Вывести на экран монитора преобразованный одномерный массив в виде строки
чисел, а также вывести результаты вычислений.
задание:
В первом одномерном массиве найти все нечетные элементы, во втором
одномерном массиве найти все четные элементы и из них сформировать
одномерный массив.
__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
13.02.2014, 16:05
Ответы с готовыми решениями:

В первом массиве найти все положительные элементы, во втором массиве найти все отрицательные элементы и сформировать массив
В первом одномерном массиве найти все положительные элементы, во втором одномерном массиве найти...

В одномерном массиве найти все элементы, большие заранее заданного числа, и из них сформировать одномерный массив
1. Ввести одномерный массив поэлементно с помощью клавиатуры или получить его, используя генератор...

В первом массиве собрать все четные элементы исходного, а во втором – все нечетные
Дан массив из N чисел. Сформировать из него два массива: в первом собрать все четные элементы...

В одномерном массиве из 10 чисел найти все чётные элементы
надо в одномерном массиве из 10 чисел найти все чётные я не могу понять как кидать числа в массив...

9
1646 / 1075 / 1081
Регистрация: 03.07.2013
Сообщений: 4,507
13.02.2014, 16:38 2
Стандартные операции с массивами (матрицами)
0
0 / 0 / 0
Регистрация: 10.02.2014
Сообщений: 12
13.02.2014, 16:52  [ТС] 3
я не нашел атм нужной информации, а можно просто кодом, пожалуйста?
0
1646 / 1075 / 1081
Регистрация: 03.07.2013
Сообщений: 4,507
13.02.2014, 17:58 4
Цитата Сообщение от 4yDoNaPaCiK Посмотреть сообщение
я не нашел атм нужной информации,
Зато там есть практический материал для изучения как работать с массивами.
0
0 / 0 / 0
Регистрация: 10.02.2014
Сообщений: 12
13.02.2014, 18:20  [ТС] 5
и все же, я был бы благодарен за готовую программу
0
273 / 241 / 56
Регистрация: 29.05.2012
Сообщений: 889
14.02.2014, 01:06 6
Лучший ответ Сообщение было отмечено 4yDoNaPaCiK как решение

Решение

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
program arrays;
 
const 
  N = 14;
 
type
  MyArray = array [1..N] of integer;
 
var i: integer;
    a,b,c: MyArray;
  
begin
  for i:=1 to N do
  begin
    a[i] := random(11);
    b[i] := random(11);
  end;
  
  write('A: '); for i:=1 to N do write(a[i]:3);  writeln;  
  write('B: '); for i:=1 to N do write(b[i]:3);  writeln;  
  
  for i:=1 to N do
  begin
    if ((i mod 2) = 0) then c[i] := b[i]
    else c[i] := a[i];
  end;
  
  write('C: '); for i:=1 to N do write(c[i]:3);  writeln;    
end.
A: 4 4 10 3 9 9 8 7 8 9 9 9 4 3
B: 2 5 8 6 2 6 10 1 6 7 1 5 4 5
C: 4 5 10 6 9 6 8 1 8 7 9 5 4 5
1
0 / 0 / 0
Регистрация: 10.02.2014
Сообщений: 12
10.03.2014, 22:20  [ТС] 7
В первом одномерном массиве найти все нечетные элементы, во втором
одномерном массиве найти все четные элементы и из них сформировать
одномерный массив.
простите за баян, но решение, которое было предложено, работает неправильно
0
Модератор
Эксперт Pascal/DelphiЭксперт NIX
7096 / 4219 / 2734
Регистрация: 22.11.2013
Сообщений: 12,099
Записей в блоге: 1
10.03.2014, 22:38 8
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

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
const
  LIM=100; W=4; n=10;
type
  tm = array [1..n] of integer;
procedure minit(var a: tm);
var i: integer;
begin
  for i:=1 to n do begin
    a[i]:=Random(LIM); Write(a[i]:4);
  end; WriteLn;
end;
var
  a, b, c: tm;
  nc, i: integer;
begin
  WriteLn('A='); minit(a);
  WriteLn('B='); minit(b);
  WriteLn('C=');
  nc:=0;
  for i:=1 to n do
    if odd(a[i]) then begin
      inc(nc); c[nc]:=a[i]; Write(c[nc]:W);
    end;
  for i:=1 to n do
    if not odd(b[i]) then begin
      inc(nc); c[nc]:=b[i]; Write(c[nc]:W);
    end;
  WriteLn; 
  Write('Нажмите ENTER...'); ReadLn;
end.
0
0 / 0 / 0
Регистрация: 10.02.2014
Сообщений: 12
11.03.2014, 14:34  [ТС] 9
проверил, программа работает некоректно
0
Модератор
Эксперт Pascal/DelphiЭксперт NIX
7096 / 4219 / 2734
Регистрация: 22.11.2013
Сообщений: 12,099
Записей в блоге: 1
11.03.2014, 15:38 10
Лучший ответ Сообщение было отмечено 4yDoNaPaCiK как решение

Решение

Цитата Сообщение от 4yDoNaPaCiK Посмотреть сообщение
проверил, программа работает некоректно
хм, был косячок с размером c, при определенных условиях может содержать все элементы из a и b, если в a все нечетные, а в b все четные:
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
const
  LIM=100; W=4; n=10;
type
  tm = array [1..n] of integer;
procedure minit(var a: tm);
var i: integer;
begin
  for i:=1 to n do begin
    a[i]:=Random(LIM); Write(a[i]:4);
  end; WriteLn;
end;
var
  a, b: tm;
  c: array [1..2*n] of integer;
  nc, i: integer;
begin
  WriteLn('A='); minit(a);
  WriteLn('B='); minit(b);
  WriteLn('C=');
  nc:=0;
  for i:=1 to n do
    if odd(a[i]) then begin
      inc(nc); c[nc]:=a[i]; Write(c[nc]:W);
    end;
  for i:=1 to n do
    if not odd(b[i]) then begin
      inc(nc); c[nc]:=b[i]; Write(c[nc]:W);
    end;
  WriteLn; 
  Write('Нажмите ENTER...'); ReadLn;
end.
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
11.03.2014, 15:38
Помогаю со студенческими работами здесь

В первом массиве найти все положительные элементы, во втором массиве найти все отрицательные элементы
В первом одномерном массиве найти все положительные элементы, во втором одномерном массиве найти...

В одномерном массиве все четные элементы заменить на их квадраты, а нечетные умножить на 2
В одномерном массиве все четные элементы заменить на их квадраты, а нечетные умножить на 2.

В одномерном массиве А все четные элементы увеличить в три раза, а нечетные уменьшить на единицу
В одномерном массиве А, состоящем из 12 целых чисел ,все четные элементы увеличить в три раза, а...

в одномерном массиве найти все элементы, входящие в этот массив по одному разу
в одномерном массиве найти все элементы, входящие в этот массив по одному разу?


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

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

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