Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/5: Рейтинг темы: голосов - 5, средняя оценка - 5.00
Yulianochka
0 / 0 / 0
Регистрация: 18.04.2015
Сообщений: 72
1

Из положительных и отрицательных элементов исходного массива сформировать два новых

05.04.2016, 05:29. Просмотров 1044. Ответов 1
Метки нет (Все метки)

3.Составьте программу формирования из массива A двух массивов, в которых первый массив заполнен отрицательными, а второй - положительными элементами.
Помогите пожалуйста
0
Лучшие ответы (1)
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
05.04.2016, 05:29
Ответы с готовыми решениями:

Сформировать два новых целочисленных массива B и C из элементов исходного
Помгите пожалуйста господа форумчане! Ничего не соображаю в сериях. Дан целочисленный массив A...

Сформировать два новых массива из 20-ти первых и из 20-ти последних элементов исходного массива, деленных на max
С помощью функции Random сформировать двумерный массив размером n*m вещественных чисел с элементами...

Построить два новых массива, состоящие из четных и нечетных элементов исходного
Начались массивы, в которых, к сожалению, я ничего не понимаю. Вот задача - Дан массив Y1, Y2,...

Одномерный массив. Сформировать из него два массива: из дробных частей положительных элементов,из дробных частей отрицательных элементов.
Вводится массив A(n) из элементов вещественного типа. Сформировать из него два массива: POL-из...

Сформировать два массива из элементов исходного
Помогите исправить ошибку! Он формирут 2 массива, но не формирует их так, чтобы в одном были...

1
Puporev
Модератор
56598 / 43285 / 29928
Регистрация: 18.05.2008
Сообщений: 102,970
05.04.2016, 08:19 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
47
48
uses crt;
const nmax=100;
var a,b,c:array[1..nmax] of integer;
    n,m,k,i:byte;
begin
clrscr;
randomize;
repeat
write('Размер массива А от 2 до ',nmax,' n=');
readln(n);
until n in [2..nmax];
m:=0;
k:=0;
writeln('Массив A');
for i:=1 to n do
 begin
  a[i]:=-30+random(61);
  write(a[i]:4);
  if a[i]<0 then
   begin
    m:=m+1;
    b[m]:=a[i];
   end
  else if a[i]>0 then
   begin
    k:=k+1;
    c[k]:=a[i];
   end;
 end;
writeln;
if m=0 then writeln('В массиве А нет отрицательных элементов')
else
 begin
  writeln('Массив отрицательных элементов');
  for i:=1 to m do
  write(b[i]:4);
  writeln;
 end;
if k=0 then writeln('В массиве А нет положительных элементов')
else
 begin
  writeln('Массив положительных элементов');
  for i:=1 to k do
  write(c[i]:4);
  writeln;
 end;
readln
end.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
05.04.2016, 08:19

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

Сформировать два одномерных массива из элементов исходного
Помогите как можно скорее решить данную задачку)Заранее спасибо) Задан одномерный массив Z(N)...

Сформировать из массива два новых: первый — из отрицательных элементов, второй — из положительных
Задать массив случайными вещественными числами в диапазоне значений от -90 до +100. Сформировать из...


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

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

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