М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
MissSonka
MissSonka
30.07.2020 23:40 •  Информатика

В стране Берляндии города расположены на сетке n на m клеток. Города нумеруются слева-направо и сверху-вниз. Левый верхний город будет иметь координаты (1,1), а правый нижний город будет иметь координаты (n,m). Дороги соединяют города по сетке, то есть город с координатами (x, y) имеет дороги к 4-м городам c координатами (x + 1, y), (x - 1, y), (x, y + 1), (x, y - 1), с условием того, что города с такими координатами существуют. Есть k некрасивых городов. Президент хочет проехать из города, расположенного слева вверху в город справа внизу. Но он не хочет проезжать по некрасивым городам.Так же он может ехать только вправо или вниз по сетке президенту понять, сможет ли он добраться до правого нижнего города, посещая только красивые города.

Гарантируется что левый верхний и правый нижний города красивые.

Формат ввода
В первой строке даны два целых числа n, m (1 ≤ n, m ≤ 105, n*m ≤ 105) — размеры сетки

Во второй строке дано число k(0 ≤ k ≤ n*m) — количество некрасивых городов

В каждой из последующих k строк даны два числа xi и yi - координаты i-го некрасивого города

Формат вывода
Если президент сможет проехать путь, посещая только красивые города, то выведите «YES», иначе «NO» (без кавычек)

Тесты:
3 3
3
1 2
2 2
3 2
ответ: NO

👇
Открыть все ответы
Ответ:
Annkot22
Annkot22
30.07.2020
// PascalABC.NET 3.3, сборка 1599 от 17.12.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var (m,n):=ReadInteger2('Количество строк и столбцов в массиве:');
  Writeln('*** Исходный массив ***');
  var d:=MatrRandom(m,n,-99,99);
  d.Println(4); Writeln(4*d.ColCount*'-');
  var min:=d.ElementsByRow.Min; // значение минимального элемента
  Writeln('Искомое среднее: ',d.ElementsByRow.Where(t->t<>min).Average)
end.

Пример
Количество строк и столбцов в массиве: 4 7
*** Исходный массив ***
   7 -31  80  21  38 -36  16
  42  93 -11  74  -6  37 -71
  15  90 -71 -88 -71  70 -27
  12  83  41  79  72  91 -88

Искомое среднее: 24.5
4,7(74 оценок)
Ответ:
mashuna1
mashuna1
30.07.2020

Если это программа в Кумире, то в таком виде она не заработает.

Нужно исправить ошибки- вместо "куда" должно стоять "кц" (конец цикла),  а первые три строчки должны начинаться с малых букв (иначе система не воспримет их как ключевые слова).

А вообще, здесь задан один цикл для переменной k (от трёх до пятнадцати, то есть 13 разных значений).

Значит, этот цикл будет выполнен 13 раз.

И каждый раз к начальному значению s (ноль), будет прибавляться десять.

В итоге получим  0 + 13 * 10 = 0 + 130 = 130

Более никакие действия с переменными не делаются, сразу печатается на экран значение s, то есть 130


Определите, что будет напечатано в результате выполнения следующего алгоритма алг нач цел s, k s: =0
4,7(50 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ