Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.73/15: Рейтинг темы: голосов - 15, средняя оценка - 4.73
1 / 1 / 0
Регистрация: 18.05.2011
Сообщений: 28
1

Записать в массив сначала все положительные числа, а затем все отрицательные числа и нули

19.05.2011, 17:16. Показов 3139. Ответов 3
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Дан массив целых чисел, содержащих 30 элементов. Записать в этот массив сначала все положительные числа, а затем все отрицательные числа и нули, сохраняя порядок их следования.

Добавлено через 2 минуты
Дан массив целых чисел, содержащих 30 элементов. Записать в этот массив сначала все положительные числа, а затем все отрицательные числа и нули, сохраняя порядок их следования.
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
19.05.2011, 17:16
Ответы с готовыми решениями:

Записать в массив сначала все отрицательные числа и нули, затем все положительные числа
Элементы массива - действительные числа в пределах от -4 до 7. Записать в этот же массив сначала...

Записать в массив сначала все отрицательные числа и нули, затем все положительные
Дан массив вещественных чисел, содержащий 15 элементов, записать в этот же массив сначала все...

Записать в массив сначала все отрицательные числа и нули, затем все положительные
Пожалуйста решите эту задачу, буду очень благодарна!!! Дан массив целых чисел, содержащий 20...

Массив. Записать сначала все отрицательные числа и нули, затем все положительные
дан массив целых чисел, содержащий 20 элементов, записать в этот же массив сначала все...

3
143 / 143 / 141
Регистрация: 05.04.2011
Сообщений: 270
19.05.2011, 17:28 2
Pascal
1
2
3
4
5
6
7
8
9
10
const n=30;
var a:array[1..100] of longint;
    i,n,x,y,k:longint;
begin
  for i:=1 to n do read(a[i]);
  for i:=1 to n do
    if a[i]>0 then write(a[i],' ');
  for i:=1 to n do
    if a[i]<=0 then write(a[i],' ');
end.
1
63 / 63 / 51
Регистрация: 20.05.2011
Сообщений: 116
27.05.2011, 11:03 3
что значит фраза "Записать в этот массив сначала все положительные числа, а затем все отрицательные числа и нули"?
1
143 / 143 / 141
Регистрация: 05.04.2011
Сообщений: 270
27.05.2011, 16:03 4
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
var a:array[1..1000] of longint;
    n,i,j,x,k:longint;
begin
  readln(n);
  for i:=1 to n do begin
    read(a[i]);
  if (a[i]<>0)and(a[i] mod 2=0) then write(a[i],' ');
  end;
  for i:= 1 to n do if a[i] mod 2=1 then write(a[i],' ');
  for i:=1 to n do if a[i]=0 then write(a[i],' ');
end.
1
27.05.2011, 16:03
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
27.05.2011, 16:03
Помогаю со студенческими работами здесь

Записать в массив сначала все положительные, затем все отрицательные и нули, сохраняя порядок следования
Приветы. задание: дан массив веществ. чисел, содержащий 25 элем. записать в этот массив сначала...

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

Записать в исходный массив сначала положительные числа и отрицательные, а затем нули, сохраняя порядок
Дан массив из 25 вещественных чисел. Записать в этот же массив сначала все положительные числа и...

Преобразовать массив так, чтобы сначала были расположены все отрицательные числа и нули, а потом все положительные
Помогите пожалуста! Нада здать лабу, а зделать не могу! Задание на лабораторную работу 1....


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

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru