Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.80/5: Рейтинг темы: голосов - 5, средняя оценка - 4.80
sanek_next
Мимолетом здесь...
51 / 51 / 0
Регистрация: 14.05.2010
Сообщений: 208
1

Создать новый массив

28.09.2010, 18:36. Просмотров 888. Ответов 1
Метки нет (Все метки)

В массиве К (ограничение 20эл) Создать новый массив состоящий из отрицательных элементов , стоящих на четных местах.!
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
28.09.2010, 18:36
Ответы с готовыми решениями:

Массив. Создать новый массив из четных элементов исходного
заполнить массив...

Создать новый массив y[i]=(x[i])^i
Помогите пожалуйста решить, не даются мне подпрограммы... Дан массив x из 15 элементов....

Создать новый массив из положительных элементов заданного массива
2. задано одномерный массив целых чисел. Создать новый массив с положительных элементов заданного...

Создать новый массив, объединив два заданных массива
Заданы два массива, содержащих по n целых чисел. Составить программу формирования третьего массива...

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

1
Snoopy
1912 / 1069 / 383
Регистрация: 06.12.2008
Сообщений: 2,802
28.09.2010, 18:43 2
Лучший ответ Сообщение было отмечено sanek_next как решение

Решение

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
uses crt;
const n=20;
var a,b:array[1..n] of integer;
    i,k:integer;
begin
ClrScr;
Randomize;
Writeln('Massiv A:');
for i:=1 to n do
 begin
  a[i]:=random(20)-10;
  Write(a[i],'  ');
 end;
Writeln;
k:=0;
for i:=1 to n do
 if (a[i]<0) and (i mod 2=0) then
  begin
   k:=k+1;
   b[k]:=a[i];
  end;
Writeln('Massiv B: ');
for i:=1 to k do
 Write(b[i],'  ');
Readln;
end.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
28.09.2010, 18:43

Создать новый массив из элементов данного, которые не принадлежат интервалу (4,14)
не могу понять .Числовой массив из 14 элементов.Новый массив из элементов данного ,которые не...

Создать новый массив, заменив отрицательные элементы на –i, положительные на +i , нулевые на 7
Помогите сделать массивы Дан массив B(N). Создать новый массив, заменив отрицательные элементы...

Создать новый массив, содержащий информацию обоих заданных массивов
Ребят , хелпаните пожалуйста =) Задано два массива записей . Первый содержит данные с фамилиями...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru