Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 15.06.2017, 01:05   #1
Fallen199
 
Регистрация: 15.06.2017
Сообщений: 6
Сообщение Найти первый отрицательный элемент массива, кратный заданному числу, сменить у него знак и поставить в начало массива.

Подскажите пожалуйста никак не могу написать код Pascal:
1.Найти первый отрицательный элемент массива, кратный заданному числу, сменить у него знак и поставить в начало массива.
Ни один элемент не должен массива потеряться\\
2.Расположить в порядке убывания отрицательные элементы тех строк, последний элемент которых находится в заданных пределах
Заранее благодарю

Последний раз редактировалось Fallen199; 15.06.2017 в 01:08.
Fallen199 вне форума Ответить с цитированием
Старый 15.06.2017, 08:47   #2
newerow1989
Я самый любопытный
Участник клуба
 
Аватар для newerow1989
 
Регистрация: 24.07.2012
Сообщений: 1,949
По умолчанию

Кросспосты:
http://programmersforum.ru/showthread.php?t=309912
http://programmersforum.ru/showthread.php?t=309911


Цитата:
Сообщение от Fallen199 Посмотреть сообщение
в начало массива
Подправить:
Код:
   k:=-p[i0];
   For i:=i0 to 2 do
      p[i]:=p[i-1];
   p[1]:=k;
С запрограммированным приветом, Неверов Евгений!
Сайт: http://newerow1989.ru
[Паскаль] [Delphi]

Последний раз редактировалось newerow1989; 15.06.2017 в 08:50.
newerow1989 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Найти первый отрицательный элемент массива, кратный заданному числу, сменить у него знак и поставить в конец массива. Fallen199 Паскаль, Turbo Pascal, PascalABC.NET 1 15.06.2017 08:03
[Си]: В каждом столбце двумерного массива поменять местами первый отрицательный элемент и последний нулевой. Помогите найти ошибку Yulia24* Помощь студентам 2 20.11.2016 01:21
Удалить из массива первый отрицательный элемент. EasyMak Помощь студентам 4 19.01.2015 17:40
Определить ближайший элемент массива к заданному числу wowan Паскаль, Turbo Pascal, PascalABC.NET 1 28.05.2011 23:21
найти первый отрицательный элемент массива имеющий чётный номер (Delphi) Vanger Помощь студентам 5 25.01.2011 11:41