Перейти к содержимому


- - - - -

Форма и вода


В этой теме нет ответов

#1 yanush

    Пользователь

  • Пользователи
  • PipPip
  • 21 сообщений

Отправлено 22 декабря 2011 - 12:25

Условие:
Жила была форма NxM разделённая на квадратики. Высота каждого столбика (квадратика) равнялась циферке в нём. Такую форму опустили в воду. Её достали из воды и вся вода которая была не в углублении стекла. Вопрос: Сколько воды осталось? Изображение

Решение:
Сначала мы создаём массив b, это изначальный массив только его опустили в воду и вода ещё не слилась (заполнили максимальным середину этого массива. Середину потому что границы не могут держать воду). Потом мы начинаем "сливать" воду следующим образом. Мы бежим очередью по границам и смотрим на соседей, если сосед выше меня с водой, то делаем его таким как я если это вода, и оставляем свою высоту (в массиве а), если нельзя просто слить воду (и записываем соседа в очередь). Таким образом когда закончится алгоритм очередь у нас останется массив с макс. кол-вом воды посередине. Мы бежим по середине (необязательно, т.к. воды на границах нет, но эти малюсенькие частички времени могут вам помешать на олимпиаде сдать задачу) и складываем кол-во воды в кубиках (кубик с водой отнять настоящую высоту). Как-то так.
var a,b:array[1..100,1..100]of integer;
q:array[1..2,1..100000] of integer;
i,j,n,m,max,un,uk,s:longint;
function maximum(x,y:longint):longint;
begin
if x>y then maximum:=x
   	else maximum:=y;
end;
procedure sosed(x,y:longint);
begin
if ((x>0)and(x<=m)and(y>0)and (y<=n)and(p[x,y]=0))and(b[i,j]<b[x,y])and(b[x,y]<>a[x,y]) then begin
                                                          	b[x,y]:=maximum(b[i,j],a[x,y]);
                                                          	q[1,uk]:=x;
                                                          	q[2,uk]:=y;
                                                          	uk:=uk+1;
                                                     		end;
end;
begin
readln(n,m);
s:=0;
for i:=1 to n do
for j:=1 to m do
begin
  read(a[i,j]);
  b[i,j]:=a[i,j];
end;
if (n<=2)or(m<=2) then begin
                    	writeln(0);
                    	exit;
               		end;
max:=a[1,1];
for i:=1 to n do
for j:=1 to m do
if a[i,j]>max then max:=a[i,j];
for i:=2 to n-1 do
  for j:=2 to m-1 do
  b[i,j]:=max;
un:=1;
uk:=1;
for i:=2 to n-1 do
begin
  q[1,uk]:=i;
  q[2,uk]:=1;
  uk:=uk+1;
  q[1,uk]:=i;
  q[2,uk]:=m;
  uk:=uk+1;
end;
for j:=2 to m-1 do
begin
  q[1,uk]:=1;
  q[2,uk]:=j;
  uk:=uk+1;
  q[1,uk]:=n;
  q[2,uk]:=j;
  uk:=uk+1;
end;
while un<>uk do
begin
  i:=q[1,un];
  j:=q[2,un];
  un:=un+1;
  sosed(i+1,j);  sosed(i,j+1);
  sosed(i-1,j);  sosed(i,j-1);                  
end;
for i:=1 to n do
for j:=1 to m do
s:=s+abs(a[i,j]-b[i,j]);
writeln(s);
end.


#2 nogobsent

    Пользователь

  • Пользователи
  • PipPip
  • 10 сообщений
  • ГородTangier

Отправлено 24 июня 2020 - 20:48

Viagra Free Trial Generic Cialis Prix Medicament Propecia cialis online Celecoxib Online

#3 Sarahanam

    Новичок

  • Пользователи
  • Pip
  • 0 сообщений

Отправлено 02 сентября 2020 - 20:39

Это было и со мной. Давайте обсудим этот вопрос.

---
Я считаю, что Вы не правы. Я уверен. Давайте обсудим это. сиянов скил, скачать книгу вселенная и матвеев дмитрий самиздат политова анетта все книги скачать бесплатно

#4 Ashleybar

    Новичок

  • Пользователи
  • Pip
  • 0 сообщений

Отправлено 03 сентября 2020 - 01:23

нормуль,давно искал! всем спасибо...

---
Неудачная мысль эротика хорошая, мамки эротика а также Журналы для взрослых шведская эротика

#5 KeithZed

    Новичок

  • Пользователи
  • Pip
  • 0 сообщений
  • ГородBanepa

Отправлено 06 октября 2020 - 10:08

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

#6 KeithZed

    Новичок

  • Пользователи
  • Pip
  • 0 сообщений
  • ГородBanepa

Отправлено 06 октября 2020 - 10:09

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

#7 KeithZed

    Новичок

  • Пользователи
  • Pip
  • 0 сообщений
  • ГородBanepa

Отправлено 06 октября 2020 - 10:09

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

#8 KeithZed

    Новичок

  • Пользователи
  • Pip
  • 0 сообщений
  • ГородBanepa

Отправлено 06 октября 2020 - 10:10

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

#9 KeithZed

    Новичок

  • Пользователи
  • Pip
  • 0 сообщений
  • ГородBanepa

Отправлено 06 октября 2020 - 10:10

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

#10 KeithZed

    Новичок

  • Пользователи
  • Pip
  • 0 сообщений
  • ГородBanepa

Отправлено 06 октября 2020 - 10:11

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

#11 KeithZed

    Новичок

  • Пользователи
  • Pip
  • 0 сообщений
  • ГородBanepa

Отправлено 06 октября 2020 - 10:11

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

#12 KeithZed

    Новичок

  • Пользователи
  • Pip
  • 0 сообщений
  • ГородBanepa

Отправлено 06 октября 2020 - 10:12

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

#13 KeithZed

    Новичок

  • Пользователи
  • Pip
  • 0 сообщений
  • ГородBanepa

Отправлено 06 октября 2020 - 10:13

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

#14 KeithZed

    Новичок

  • Пользователи
  • Pip
  • 0 сообщений
  • ГородBanepa

Отправлено 06 октября 2020 - 10:13

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

#15 KeithZed

    Новичок

  • Пользователи
  • Pip
  • 0 сообщений
  • ГородBanepa

Отправлено 06 октября 2020 - 10:14

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

#16 KeithZed

    Новичок

  • Пользователи
  • Pip
  • 0 сообщений
  • ГородBanepa

Отправлено 06 октября 2020 - 10:14

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

#17 KeithZed

    Новичок

  • Пользователи
  • Pip
  • 0 сообщений
  • ГородBanepa

Отправлено 06 октября 2020 - 10:15

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

#18 KeithZed

    Новичок

  • Пользователи
  • Pip
  • 0 сообщений
  • ГородBanepa

Отправлено 06 октября 2020 - 10:15

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

#19 KeithZed

    Новичок

  • Пользователи
  • Pip
  • 0 сообщений
  • ГородBanepa

Отправлено 06 октября 2020 - 10:16

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

#20 KeithZed

    Новичок

  • Пользователи
  • Pip
  • 0 сообщений
  • ГородBanepa

Отправлено 06 октября 2020 - 10:16

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





Количество пользователей, читающих эту тему: 1

0 пользователей, 1 гостей, 0 анононимных