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

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

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

Восстановить пароль

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

Ответ
 
Опции темы Поиск в этой теме
Старый 19.12.2006, 08:59   #1
Вацура
Новичок
Джуниор
 
Регистрация: 19.12.2006
Сообщений: 1
Восклицание Подготовка к олимпеаде

Здравствуйте.
У меня 21 декабря олимпеада, помогите подготовиться. Я вообще ничего не знаю про массивы, ктонибудь может кинуть ссылку где обьясняються простейшие задачи с массивами?

Вот задача на массив с прошлой олимпеады:
Задано число N и целочисленный массив A(N). Найдите длину самой длинной последовательности подряд идущих элементов массива, равных нулю.

Вот ещё задача которую я непойму:
Построить можель реального процесса(физического,химического,би ологического).

Объясните как решить эту задачку?
Спасибо за внимание.

Последний раз редактировалось Вацура; 19.12.2006 в 09:02.
Вацура вне форума Ответить с цитированием
Старый 19.12.2006, 09:08   #2
zetrix
Delphi/C++/C#
Участник клуба
 
Аватар для zetrix
 
Регистрация: 29.10.2006
Сообщений: 1,972
По умолчанию

Цитата:
Построить можель реального процесса(физического,химического,би ологического).
Ну... Например возьмём модель падения тела с высоты:
1) изображаем шарик
2) шарик падает на опору (просто прямоугольник)
3) шарик подскакивает
4) см пункт 2 (продолжать действие: затухающие колебания)

Т.е. шарик попрыгал, попрыгал и успокоился

Можно изобразить диффузию:
взять нарисовать прямоугольник, разделённый на 2 части.
В первой части бегают красные шарики, во второй - синие. Потом перегородка убирается, и мы наблюдаем как шарики смешиваются (происходит диффузия)

Это задание творческое, можно придумать всё что угодно, в зависимости от владения языком программирования и предоставленного времени.
zetrix вне форума Ответить с цитированием
Старый 20.12.2006, 13:06   #3
Virtson
Владимир М.
Участник клуба
 
Аватар для Virtson
 
Регистрация: 30.10.2006
Сообщений: 1,289
Счастье первая задача

Код:
k:= 0; 
max:= 0;
for i:= 1 to n do 
  if a[i]=0 then inc(k)
  else 
  begin
    if k> max then max:= k;
    k:= 0
  end;
if k> max then max:= k;
Берегите друг друга!
Virtson вне форума Ответить с цитированием
Старый 29.04.2010, 07:23   #4
binommax
Новичок
Джуниор
 
Регистрация: 22.04.2010
Сообщений: 1
По умолчанию

var
b: string;
i: integer;
begin
write('Vvedite stroku:');
read(b);
for i:=1 to length(b) do
if b[i]=','then write ('Poryadkovii nomer zapyatoi:' ,i);
end.
binommax вне форума Ответить с цитированием
Старый 29.04.2010, 07:27   #5
ROMA2PVT
ТАМБОВСКИЙ ВОЛК.
Участник клуба
 
Аватар для ROMA2PVT
 
Регистрация: 16.03.2010
Сообщений: 1,354
По умолчанию

На дату поста глянь.Любитель древностей.
にんじゃ
ROMA2PVT вне форума Ответить с цитированием
Ответ


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