Hip-Hop.Ru
Страница 43 из 136: « Первая ← 2333363738394041424344454647484950536393 → Последняя »
Показывать 50 сообщений этой темы на одной странице

Hip-Hop.Ru (https://www.hip-hop.ru/forum/)
-   Компьютеры и Интернет (https://www.hip-hop.ru/forum/kompyutery-i-internet-f186)
-   -   Программисты / Компьютерные техники, которые НИКОГДА не спят! [Беседка] (https://www.hip-hop.ru/forum/programmisty-kompyuternye-tehniki-kotorye-nikogda-ne-spyat-besedka-252443/)

Трэй 4 марта 2011 13:38
Цитата:
Цитата от Hammer (Сообщение 1072582606)
Цитата:
Цитата от Трэй (Сообщение 1072582479)
не могу реальзовать нахождение само.
язык паскаль
Код:
const N = 10;
var
  m : array[1..N] of integer;
  i, num, max : integer;
begin
  num:= 0; max:= 0;
  writeln('Введите массив:');
  for i:= 1 to N do
    begin
      readln(m[i]);
      if (odd(m[i]) = false) OR (i = N) then
        begin
          if (num > max) then max:= num;
          num:= 0;
        end
      else
        inc(num);
    end;

  writeln('Максимальная последовательность: ', max);
  readln;
end.
он по ходу последнее число не считывает
тестовый набор: 1 3 5 2 4 1 3 5 1 1
вывод:4

Hammer 4 марта 2011 14:44
Цитата:
Цитата от Трэй (Сообщение 1072583087)

он по ходу последнее число не считывает
тестовый набор: 1 3 5 2 4 1 3 5 1 1
вывод:4
Код:
const N = 10;
var
  m : array[1..N] of integer;
  i, num, max : integer;
begin
  num:= 0; max:= 0;
  writeln('Введите массив:');
  for i:= 1 to N do
    begin
      readln(m[i]);
      if (odd(m[i]) = false) OR (i = N) then
        begin
          if (i = N) then inc(num);       
          if (num > max) then max:= num;
          num:= 0;
        end
      else
        inc(num);
    end;

  writeln('Максимальная последовательность: ', max);
  readln;
end.
Можно конечно покрасивее сделать, но нет времени.

Добавлено через 1 час 45 минут 51 секунду
Чего-то перемудрил я. Сейчас исправлю.

Добавлено через 1 час 47 минут 34 секунды
Код:
const N = 10;
var
  m : array[1..N] of integer;
  i, num, max : integer;
begin
  num:= 0; max:= 0;
  writeln('Введите массив:');
  for i:= 1 to N do
    begin
      readln(m[i]);
      if (odd(m[i])) then inc(num);
      if (odd(m[i]) = false) OR (i = N) then
        begin     
          if (num > max) then max:= num;
          num:= 0;
        end;
    end;

  writeln('Максимальная последовательность: ', max);
  readln;
end.

Трэй 4 марта 2011 16:33
Цитата:
Цитата от Hammer (Сообщение 1072583781)
Цитата:
Цитата от Трэй (Сообщение 1072583087)

он по ходу последнее число не считывает
тестовый набор: 1 3 5 2 4 1 3 5 1 1
вывод:4
Код:
const N = 10;
var
  m : array[1..N] of integer;
  i, num, max : integer;
begin
  num:= 0; max:= 0;
  writeln('Введите массив:');
  for i:= 1 to N do
    begin
      readln(m[i]);
      if (odd(m[i]) = false) OR (i = N) then
        begin
          if (i = N) then inc(num);       
          if (num > max) then max:= num;
          num:= 0;
        end
      else
        inc(num);
    end;

  writeln('Максимальная последовательность: ', max);
  readln;
end.
Можно конечно покрасивее сделать, но нет времени.

Добавлено через 1 час 45 минут 51 секунду
Чего-то перемудрил я. Сейчас исправлю.

Добавлено через 1 час 47 минут 34 секунды
Код:
const N = 10;
var
  m : array[1..N] of integer;
  i, num, max : integer;
begin
  num:= 0; max:= 0;
  writeln('Введите массив:');
  for i:= 1 to N do
    begin
      readln(m[i]);
      if (odd(m[i])) then inc(num);
      if (odd(m[i]) = false) OR (i = N) then
        begin     
          if (num > max) then max:= num;
          num:= 0;
        end;
    end;

  writeln('Максимальная последовательность: ', max);
  readln;
end.
спасибо тебе:horosho:
всегда выручаешь

d-mob 4 марта 2011 20:20
Слава Богу. что Я - эколог.

Hammer 4 марта 2011 20:21
Цитата:
Цитата от d-mob (Сообщение 1072587597)
Слава Богу. что Я - эколог.
Ну и зря!

d-mob 4 марта 2011 20:22
Цитата:
Цитата от Hammer (Сообщение 1072587608)
Цитата:
Цитата от d-mob (Сообщение 1072587597)
Слава Богу. что Я - эколог.
Ну и зря!
Да это ж пиздец вот эти коды:eek:

Hammer 4 марта 2011 20:23
Цитата:
Цитата от d-mob (Сообщение 1072587623)
Цитата:
Цитата от Hammer (Сообщение 1072587608)
Цитата:
Цитата от d-mob (Сообщение 1072587597)
Слава Богу. что Я - эколог.
Ну и зря!
Да это ж пиздец вот эти коды:eek:
Кому-то нравится экология, кому-то коды. :saint:
У кого какой склад ума.

d-mob 4 марта 2011 20:27
Цитата:
Цитата от Hammer (Сообщение 1072587638)
Цитата:
Цитата от d-mob (Сообщение 1072587623)
Цитата:
Цитата от Hammer (Сообщение 1072587608)

Ну и зря!
Да это ж пиздец вот эти коды:eek:
Кому-то нравится экология, кому-то коды. :saint:
У кого какой склад ума.
Нравилась бы мне экология, я бы не пошёл бы экологом. :)
А вообще я учусь там, где тут у нас чуть ли не лучших в стране программистов делают, я охуеваю от того, что они делают. Сколько им в голову влезает .

Hammer 4 марта 2011 20:28
Цитата:
Цитата от d-mob (Сообщение 1072587679)
Цитата:
Цитата от Hammer (Сообщение 1072587638)
Цитата:
Цитата от d-mob (Сообщение 1072587623)

Да это ж пиздец вот эти коды:eek:
Кому-то нравится экология, кому-то коды. :saint:
У кого какой склад ума.
Нравилась бы мне экология, я бы не пошёл бы экологом. :)
А вообще я учусь там, где тут у нас чуть ли не лучших в стране программистов делают, я охуеваю от того, что они делают. Сколько им в голову влезает .
А если не секрет, тут у нас - это где? :rolleyes:

Т.е. ты пошел на эколога, но тебе самому не прельщает данная профессия?

d-mob 4 марта 2011 20:32
Цитата:
Цитата от Hammer (Сообщение 1072587711)
Цитата:
Цитата от d-mob (Сообщение 1072587679)
Цитата:
Цитата от Hammer (Сообщение 1072587638)

Кому-то нравится экология, кому-то коды. :saint:
У кого какой склад ума.
Нравилась бы мне экология, я бы не пошёл бы экологом. :)
А вообще я учусь там, где тут у нас чуть ли не лучших в стране программистов делают, я охуеваю от того, что они делают. Сколько им в голову влезает .
А если не секрет, тут у нас - это где? :rolleyes:

Т.е. ты пошел на эколога, но тебе самому не прельщает данная профессия?
В Казахстане.

Мне пока что нравится быть экологом.

Hammer 4 марта 2011 20:33
Цитата:
Цитата от d-mob (Сообщение 1072587747)

В Казахстане.

Мне пока что нравится быть экологом.
К сожалению, не наслышан. :(

У нас в Питере довольно-неплохо с этим дела обстоят. :dovolen:

Тедди 4 марта 2011 20:34
Вот вам темка, пасаны
Программа , считающая определитель любого порядка.
Думаю над этим

Hammer 4 марта 2011 20:36
Цитата:
Цитата от Тедди (Сообщение 1072587768)
Вот вам темка, пасаны
Программа , считающая определитель любого порядка.
Думаю над этим
И в чем проблема?

Тедди 4 марта 2011 20:39
Цитата:
Цитата от Hammer (Сообщение 1072587796)
Цитата:
Цитата от Тедди (Сообщение 1072587768)
Вот вам темка, пасаны
Программа , считающая определитель любого порядка.
Думаю над этим
И в чем проблема?
Не могу сформулировать алгоритм. Ну , то есть понятно, что по одной строке считаем и домножаем на миноры. Минуоры считаем так же, потом миноры миноров и т.д. Но как то в голове алгоритм сам не рисуется

Hammer 4 марта 2011 20:41
Цитата:
Цитата от Тедди (Сообщение 1072587837)
Цитата:
Цитата от Hammer (Сообщение 1072587796)
Цитата:
Цитата от Тедди (Сообщение 1072587768)
Вот вам темка, пасаны
Программа , считающая определитель любого порядка.
Думаю над этим
И в чем проблема?
Не могу сформулировать алгоритм. Ну , то есть понятно, что по одной строке считаем и домножаем на миноры. Минуоры считаем так же, потом миноры миноров и т.д. Но как то в голове алгоритм сам не рисуется
Есть же уже готовые алгоритмы. Зачем придумывать велосипед? :)

Тедди 4 марта 2011 20:43
Цитата:
Цитата от Hammer (Сообщение 1072587851)
Цитата:
Цитата от Тедди (Сообщение 1072587837)
Цитата:
Цитата от Hammer (Сообщение 1072587796)

И в чем проблема?
Не могу сформулировать алгоритм. Ну , то есть понятно, что по одной строке считаем и домножаем на миноры. Минуоры считаем так же, потом миноры миноров и т.д. Но как то в голове алгоритм сам не рисуется
Есть же уже готовые алгоритмы. Зачем придумывать велосипед? :)
Суть информатики в том чтобы раскидывать мозгами , а не лепить стандартные алгоритмы))Но здесь я пожалуй так и сделаю)

Hammer 4 марта 2011 20:46
Цитата:
Цитата от Тедди (Сообщение 1072587882)
Цитата:
Цитата от Hammer (Сообщение 1072587851)
Цитата:
Цитата от Тедди (Сообщение 1072587837)

Не могу сформулировать алгоритм. Ну , то есть понятно, что по одной строке считаем и домножаем на миноры. Минуоры считаем так же, потом миноры миноров и т.д. Но как то в голове алгоритм сам не рисуется
Есть же уже готовые алгоритмы. Зачем придумывать велосипед? :)
Суть информатики в том чтобы раскидывать мозгами , а не лепить стандартные алгоритмы))Но здесь я пожалуй так и сделаю)
Ну это для понимания. А если ты поймешь уже готовый алгоритм, то ничего не потеряешь.

Трэй 4 марта 2011 20:46
Hammer
а можешь подкинуть сайтец или файлик с операторами для паскаля?а то я оператор "odd" или "inc" впервые слышу

ТэМэ 4 марта 2011 20:47
в своей жизни я выбрал нелёгкий путь и пошёл в техникум на программиста :guinda:

Hammer 4 марта 2011 20:50
Цитата:
Цитата от Трэй (Сообщение 1072587922)
Hammer
а можешь подкинуть сайтец или файлик с операторами для паскаля?а то я оператор "odd" или "inc" впервые слышу
Ты долго пишешь на паскале? :confused: Просто это в самом начале даже проходят.
Сам редко чем пользуюсь, кроме стандартной справки паскаля, да и вообще на паскале долго время уже не пишу.
Но если тебе на русском надо, посмотри это.
Цитата:
Цитата от TYOMA_тотСамый_TM (Сообщение 1072587925)
в своей жизни я выбрал нелёгкий путь и пошёл в техникум на программиста :guinda:
Если голова варит, то не такой он и тяжелый. ;)

Тедди 4 марта 2011 20:51
Цитата:
Цитата от Трэй (Сообщение 1072587922)
Hammer
а можешь подкинуть сайтец или файлик с операторами для паскаля?а то я оператор "odd" или "inc" впервые слышу
Тут всё) http://www.delphibasics.ru/

Трэй 4 марта 2011 20:52
Цитата:
Цитата от Hammer (Сообщение 1072587958)
Цитата:
Цитата от Трэй (Сообщение 1072587922)
Hammer
а можешь подкинуть сайтец или файлик с операторами для паскаля?а то я оператор "odd" или "inc" впервые слышу
Ты долго пишешь на паскале? :confused: Просто это в самом начале даже проходят.
Сам редко чем пользуюсь, кроме стандартной справки паскаля, да и вообще на паскале долго время уже не пишу.
Но если тебе на русском надо, посмотри это.
Цитата:
Цитата от TYOMA_тотСамый_TM (Сообщение 1072587925)
в своей жизни я выбрал нелёгкий путь и пошёл в техникум на программиста :guinda:
Если голова варит, то не такой он и тяжелый. ;)
прост учитель не даёт ничего)
вот и пытаюсь сам задачи решать и учить терминологию

Hammer 4 марта 2011 20:55
Цитата:
Цитата от Трэй (Сообщение 1072587980)
Цитата:
Цитата от Hammer (Сообщение 1072587958)
Цитата:
Цитата от Трэй (Сообщение 1072587922)
Hammer
а можешь подкинуть сайтец или файлик с операторами для паскаля?а то я оператор "odd" или "inc" впервые слышу
Ты долго пишешь на паскале? :confused: Просто это в самом начале даже проходят.
Сам редко чем пользуюсь, кроме стандартной справки паскаля, да и вообще на паскале долго время уже не пишу.
Но если тебе на русском надо, посмотри это.
Цитата:
Цитата от TYOMA_тотСамый_TM (Сообщение 1072587925)
в своей жизни я выбрал нелёгкий путь и пошёл в техникум на программиста :guinda:
Если голова варит, то не такой он и тяжелый. ;)
прост учитель не даёт ничего)
вот и пытаюсь сам задачи решать и учить терминологию
Да сейчас часто такое случается, что учителя знают хуже свой предмет, чем ученик.
Речь не идет о лицеях, там вроде бы всё в порядке.

Трэй 4 марта 2011 20:56
Цитата:
Цитата от Hammer (Сообщение 1072588002)
Цитата:
Цитата от Трэй (Сообщение 1072587980)
Цитата:
Цитата от Hammer (Сообщение 1072587958)

Ты долго пишешь на паскале? :confused: Просто это в самом начале даже проходят.
Сам редко чем пользуюсь, кроме стандартной справки паскаля, да и вообще на паскале долго время уже не пишу.
Но если тебе на русском надо, посмотри это.


Если голова варит, то не такой он и тяжелый. ;)
прост учитель не даёт ничего)
вот и пытаюсь сам задачи решать и учить терминологию
Да сейчас часто такое случается, что учителя знают хуже свой предмет, чем ученик.
Речь не идет о лицеях, там вроде бы всё в порядке.
у меня обычная средняя образовательная школа(((
у моего учителя скорость набора текста на клавиатуре около 50 символов в минуту методом одного пальца

Hammer 4 марта 2011 21:00
Цитата:
Цитата от Трэй (Сообщение 1072588012)
Цитата:
Цитата от Hammer (Сообщение 1072588002)
Цитата:
Цитата от Трэй (Сообщение 1072587980)

прост учитель не даёт ничего)
вот и пытаюсь сам задачи решать и учить терминологию
Да сейчас часто такое случается, что учителя знают хуже свой предмет, чем ученик.
Речь не идет о лицеях, там вроде бы всё в порядке.
у меня обычная средняя образовательная школа(((
у моего учителя скорость набора текста на клавиатуре около 50 символов в минуту методом одного пальца
Такие учителя обычно хорошо знают материал только учебника по информатики, но зная наши учебники, можно сказать, что они знают информатику на уровне обычного пользователя. :(


Часовой пояс GMT +3, время: 22:28.
Страница 43 из 136: « Первая ← 2333363738394041424344454647484950536393 → Последняя »
Показывать 50 сообщений этой темы на одной странице

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions Inc.

vBulletin Optimisation provided by vB Optimise (Pro) - vBulletin Mods & Addons Copyright © 2025 DragonByte Technologies Ltd.