-Цитата от !ND1GO

Русский рэпер:

1. Поп
2. Мастурбация
3. Газировка
4. Салатик

я не понял первого пункта

типо урок у него в смайлах

Добавлено через 1 минуту

-Цитата от The004Uk

я не понял первого пункта

а вот я четвертого

-Цитата от The004Uk

я не понял первого пункта

Ладно. Первый пункт-"Быдло рэпчик с попсовыми мотивами"

-Цитата от Федан

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

Добавлено через 1 минуту

съебись отсюда советчик бля

разрешаешь?

А он мне ах ты бля не рэпер!

-Цитата от !ND1GO

Ладно. Первый пункт-"Быдло рэпчик с попсовыми мотивами"

ну вообще как бы рэп,да,он сам по себе такая экзотическая смесь ритмнблюза с джазом,поэтому я вот,всегда респектовал всей эренби культуре

КАК РЕШИТЬ????????

-Цитата от Woro

КАК РЕШИТЬ????????

Ты не тот форум выбрал...вообще я считаю что ты тролль, плохой тролль, я думал намного лучше это всё будет, но как-то не удалось...

-Цитата от !ND1GO

я думал намного лучше это всё будет, но как-то не удалось...

ну во первых народу мало,музыка плохая

-Цитата от The004Uk

ну во первых народу мало,музыка плохая

Направление? Какое направление?

ну что за направление музыки сейчас играет?

-Цитата от The004Uk

ну что за направление музыки сейчас играет?

因为不同地区的MC

-Цитата от Woro

因为不同地区的MC

вот такое вот направление...
фишку поняли?....это он направление такое сказал

-Цитата от Woro

КАК РЕШИТЬ????????

СПРОСИ У ЯНДЕКС
Нахуй тему создал

афтар и The004Uk - мудаки, а скорее всего один мудак свою злоебучую ссылку рекламирует)

http://vkontakte.ru/id2157696 - detected

Так не знаеш ответа нах с поста

Задача простая как дважды два
Тебе так алгоритм или в паскале?

-Цитата от D34DM4N

афтар и The004Uk - мудаки, а скорее всего один мудак свою злоебучую ссылку рекламирует)

http://vkontakte.ru/id2157696 - detected

Мудлан строго D34DM4N,потому что пидорам вообще слова не давали,а он тут залезнахуй пошёл

Главное дать наметку я дальше допру
желательно в паскале

1.В паскале описываешь массив (куда буит записываться эта последовательность чисел) и любую переменную
2.Затем присваиваешь этой переменной значение первого элемента массива если он отрицателен;
3.сравниваешь каждый следующий с предыдущим, эси он отрицателен и больше текущего значения переменой, переменной присваивается значение этого числа
(2-3 через операторы цикла)
4. выводишь значение переменной
С тя пиво

Без компилятора, в блокноте. Если debug - true, то элементы рандомно введутся, иначе с клавиатуры (для отладки)

На ошибки не проверял, под vist`oй DCC32 выдает ошибку и скомпилировать не удается

Три года не писал на паскале, ей богу ошибок до жопы

program matrix;

{$APPTYPE CONSOLE}

uses SysUtils;

const
    elem    = 10;
    debug   = true;

var
    elemCounter, collCounter, negCounter: integer;
    inputArray  : array[1..elem]  of integer;
    minElement, counter: integer;
    
begin

    if (debug = true) then randomize;

    for elemCounter := 1 to elem do begin
            writeln('Vvedi element [', elemCounter, ']: ');
            if (debug = false) then readln(inputArray[elemCounter])
            else inputArray[elemCounter] := random(14) - 7;
        end;
    end;

    writeln('Vse elementi vvedeni');

    minElement := inputArray[1];
    for counter = 2 to elem do begin
        if (minElement > elem[counter]) and (elem[counter] < 0) then minElement := elem[counter];
    end;
    
    if(minElement < 0) then writeln('Min element: ', minElement) 
    else writeln('Net otricatelnix!');

    readln;

end.

Уже два решения предложили, информатика - искусство
И никакой благодарности!

Челы спасибо!
Я вас не забуду!
Знал что на майл ру говно ответы.
Тут все серьезные.

Мы серьезные

program MaxMin;
const
  num = 5;
var
  a : array [1..num] of integer;
  i : integer;
  MinE : integer;
begin
  for i := 1 to num do
    begin
      Write('Enter next element: ');
      ReadLn(a[i]);
    end;
  MinE := a[1];
  for i := 2 to num do
    if ((a[i] < MinE) and (a[i] < 0)) then
      MinE := a[i];
 if(MinE < 0 ) then  
  WriteLn(MinE);
  readln;
end.

Вот модифицированный с интернета, он, наверное, будет без ошибок.


Как вариант - использование быстрой сортировки и вывод первого элемента. То есть у тебя есть

-

5 8 -5 0 -9 2

После сортировки

-

-9 -5 0 2 5 8

Ясен болт, что первый элемент будет минимальным. ПРимеров реализации сортировки быстрой на Delphi/Pascal - уйма.