wmmail.ru – cервис почтовых рассылок на главную
написать письмо
карта сайта

С чего начать?РекламодательПравилаFAQСтатистикаБиржа статейTOP100ФоткиКонтакты
Логин:
Пароль: 
Регистрация   Забыли пароль?
WMLogin
Пользователей всего:

512935

Пользователей сегодня:

37

Пользователей online:

210

Выплачено ($): 7`606`025,45
Выплат: 8`115`230
Писем прочитано: 1`024`955`385

 
  Все ответы  
 

Тема #335466

Внимание! В разделе запрещается:

  • Мат (оскорбления)
  • Частично реклама
  • Нарушение законодательства РФ
  • Попрошайничество и просьбы одолжить деньги, кредиты или монеты

Выделите текст и нажмите для цитирования  #  
+5   [14.11.2017 22:48] #1785204

Закрытая тема от пользователя Хелп

Дан массив из 9 целых чисел. Переставить максимальный элемент на первое место, а элементы со второго места до минимального сдвинуть на одну позицию
PASCAL

[реклама]
Раздел: Игры без компьютера, последний комментарий: 14.11.2017 23:33
Тема закрыта пользователем A_G_A
Проголосовали: Lawrik, Topglory, Riko101, Sammeri79, user555777
Ответы
Ответов всего: 18  тема закрыта 
Выделите текст и нажмите для цитирования  #  
0   [14.11.2017 22:50] Lawrik Рейтинг 1664.73     Стена пользователя Lawrik +305  Все ответы пользователя Lawrik

Могу только позеленить.Удачи в поисках помощи.:ok:
Выделите текст и нажмите для цитирования  #  
0   [14.11.2017 22:50] #909381   Все ответы пользователя

чавой? :unsure:
Выделите текст и нажмите для цитирования  #  
+1   [14.11.2017 22:51] #2958219   Все ответы пользователя

Надпись на водочной этикетке:
"Перед злоупотреблением охладить."
Проголосовали: Riko101
Выделите текст и нажмите для цитирования  #  
0   [14.11.2017 22:54] goguino Рейтинг 8958.55     Стена пользователя goguino +961  Все ответы пользователя goguino

ответ: гладиолус
Выделите текст и нажмите для цитирования  #  
0   [14.11.2017 22:55] Riko101 Рейтинг 516.62     Стена пользователя Riko101 +35  Все ответы пользователя Riko101

pascal :heart:
детство, детство, ты куда ушло (с)
Выделите текст и нажмите для цитирования  #  
0   [14.11.2017 22:55] Topglory Рейтинг 4245.17     Стена пользователя Topglory +671  Все ответы пользователя Topglory

пакскаль мало кто знает тут наверно :yes:
Выделите текст и нажмите для цитирования  #  
0   [14.11.2017 22:56] MaksimGal Рейтинг 358.73     Стена пользователя MaksimGal +79  Все ответы пользователя MaksimGal

goguino пишет ответ: гладиолус

Почему? :unsure:
Выделите текст и нажмите для цитирования  #  
+1   [14.11.2017 22:57] Riko101 Рейтинг 516.62     Стена пользователя Riko101 +35  Все ответы пользователя Riko101

стыдно, стыдно, мужчина, не учить такой стройный и легкий язык, как паскаль) он, конечно, мертвый, как древний иврит, но просто в знак уважение :lol:
Проголосовали: Sammeri79
Выделите текст и нажмите для цитирования  #  
+3   [14.11.2017 22:57] goguino Рейтинг 8958.55     Стена пользователя goguino +961  Все ответы пользователя goguino

MaksimGal пишет Почему?

потому что гладиолус
Проголосовали: MaksimGal, Riko101, Sammeri79
Выделите текст и нажмите для цитирования  #  
+2   [14.11.2017 23:00] takashikanoe Рейтинг 2998.16     Стена пользователя takashikanoe +1033  Все ответы пользователя takashikanoe

Для начала находишь максимальный элемент. Проще всего это сделать так. Говоришь, пускай мах = первый элемент. Потом в цикле сравниваешь каждый элемент с этим. Если он больше, тогда переопределяешь мах, если меньше, то просто идешь дальше. В итоге находишь самый мах элемент. Дальше, ну есть корявый варик: удаляешь мах элемент из исходного массива и потом делаешь слияние массивов, где первый массив - это этот мах элемент, а второй - оставшиеся элементы из исходного массива. Либо же перебором сдвигаешь, но, как по мне, слишком заморочливо для такой задачки, если важен всего лишь результат.
(на паскале не программирую, но думаю, что такое решение применимо для любого языка)
Проголосовали: Sammeri79, Riko101
Выделите текст и нажмите для цитирования  #  
+1   [14.11.2017 23:00] Sammeri79 Рейтинг 19887.47     Стена пользователя Sammeri79 +434  Все ответы пользователя Sammeri79

Люблю Тюфтельки в соусе и Креветки по сычуаньски с соево-перечным соусом
А так же: Танго с манго, белым шоколадом и кокосовой стружкой.:v:
Проголосовали: Riko101
Выделите текст и нажмите для цитирования  #  
0   [14.11.2017 23:01] #1785204   Все ответы пользователя

takashikanoe пишет Для начала находишь максимальный элемент. Проще всего это сделать так. Говоришь, пускай мах = первый элемент. Потом в цикле сравниваешь каждый элемент с этим. Если он больше, тогда переопределяешь мах, если меньше, то просто идешь дальше. В итоге находишь самый мах элемент. Дальше, ну есть корявый варик: удаляешь мах элемент из исходного массива и потом делаешь слияние массивов, где первый массив - это этот мах элемент, а второй - оставшиеся элементы из исходного массива. Либо же перебором сдвигаешь, но, как по мне, слишком заморочливо для такой задачки, если важен всего лишь результат.
(на паскале не программирую, но думаю, что такое решение применимо для любого языка)

Таким рецептом можно убивать психику всех людей
takashikanoe пишет Для начала находишь максимальный элемент. Проще всего это сделать так. Говоришь, пускай мах = первый элемент. Потом в цикле сравниваешь каждый элемент с этим. Если он больше, тогда переопределяешь мах, если меньше, то просто идешь дальше. В итоге находишь самый мах элемент. Дальше, ну есть корявый варик: удаляешь мах элемент из исходного массива и потом делаешь слияние массивов, где первый массив - это этот мах элемент, а второй - оставшиеся элементы из исходного массива. Либо же перебором сдвигаешь, но, как по мне, слишком заморочливо для такой задачки, если важен всего лишь результат.
(на паскале не программирую, но думаю, что такое решение применимо для любого языка)

:puck:
Выделите текст и нажмите для цитирования  #  
0   [14.11.2017 23:02] takashikanoe Рейтинг 2998.16     Стена пользователя takashikanoe +1033  Все ответы пользователя takashikanoe

#1785204 пишет Таким рецептом можно убивать психику всех людей


:crazy: шта?
Выделите текст и нажмите для цитирования  #  
0   [14.11.2017 23:05] Sammeri79 Рейтинг 19887.47     Стена пользователя Sammeri79 +434  Все ответы пользователя Sammeri79

takashikanoe пишет пускай мах


Вот это Така замахнула!

Мне стыдно. :oops1: что я этого всего не знаю.
Выделите текст и нажмите для цитирования  #  
+1   [14.11.2017 23:07] takashikanoe Рейтинг 2998.16     Стена пользователя takashikanoe +1033  Все ответы пользователя takashikanoe

Sammeri79 пишет Мне стыдно. что я этого всего не знаю.

Это не обязательно всем знать. Да и я далеко не профи :xmas:
Проголосовали: Sammeri79
Выделите текст и нажмите для цитирования  #  
0   [14.11.2017 23:13] Sammeri79 Рейтинг 19887.47     Стена пользователя Sammeri79 +434  Все ответы пользователя Sammeri79

takashikanoe пишет Это не обязательно всем знать. Да и я далеко не профи


Мне по жизни везет влюбляться в умных девушек, с дет.садика привычку такую взял.
Сам то я среднестатистического ума парень, поэтому в пролёте был зачастую.

Вообще всегда ценил ум в девушке, больше чем внешность.
Выделите текст и нажмите для цитирования  #  
+1   [14.11.2017 23:28] #1785204   Все ответы пользователя

Кому может надо, вот нацарапал
Program pros;

const N = 9;
var a: array [1..N] of integer;
var max,i: integer;

begin
for var x:=1 to N do
a[x] := Random(100);
writeln('Элементы массива a: ');
for var x:=1 to N do
write(a[x],' ');
writeln;

for var x:=N downto 2 do
a[x] := a[x-1];

max:=a[1];
for var x:=2 to N do
if a[x]>max then
begin
max:=a[x];
// a[x]:=a[1];
end;


a[1] := max;

writeln('Максимальный элемент -', max);
writeln('После сдвига вправо: ');
for var x:=1 to N do
write(a[x],' ');
writeln;
end.
Проголосовали: Riko101
Выделите текст и нажмите для цитирования  #  
+1   [14.11.2017 23:33] takashikanoe Рейтинг 2998.16     Стена пользователя takashikanoe +1033  Все ответы пользователя takashikanoe

#1785204 пишет Кому может надо, вот нацарапал

:crazy: так мы думали, что тебе надо. :book:
ЗЫ: тоже попробовала на паскале почеркать что-то онлайн, примерно такое и получилось.
Непривычный синтаксис, хотя понятный.
Проголосовали: #1785204

НОВОСТИ
03.04.2024Выплаты
подробнее>>
21.02.2024QIWI
подробнее>>

© 2004-2024 «WMMAIL» Пользовательское соглашение