Распределить всех детей в команды ровно по 11 человек

@mbekesh · Регистрация: 07.12.2017

Студворк — интернет-сервис помощи студентам

помогите решить задачу, плиз
Задача
Имя входного файла: стандартный ввод
Имя выходного файла: стандартный вывод
Ограничение по времени: 1 секунда
Ограничение по памяти: 256 мегабайт
Так как, Арсен является тренером знаменитого футбольного клуба Арсенал, он решил позабо-
титься о будущем клуба и объявил набор в футбольный кружок для юношей. Количество детей
пришедших в кружок — n оказалось очень большим числом. Тем не менее, Арсен не хочет никого
обидеть и хочет распределить всех детей в команды ровно по 11 человек. Получится ли у него?
Формат входных данных
В первой строке дано целое число n (1 ⩽ n ⩽ 101000) — количество детей пришедших в кружок.
Формат выходных данных
В первой строке выведите слово «YES» (без кавычек), если возможно всех распределить по
командам, иначе, «NO» (без кавычек).

@кот Бегемот · 07.12.2017, 08:12

Число делится на 11 тогда и только тогда, когда разность между суммой цифр стоящих на чётных местах и суммой цифр, стоящих на нечётных местах делится на 11

@mbekesh · 07.12.2017, 08:24 **[ТС]**

я правильно начал? продолжить не могу

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
program 1;
              var n, b, c, a: integer;
              input, output: text;
              begin
              assign(input,'input.txt'); reset (input);
              assign (output,'output.txt'); rewrite (output);
              read (n);
              for i:=1 to n do
              begin
              read (b, c);
              a:=n/11;
              if

@кот Бегемот · 07.12.2017, 08:51

У Вас число может быть 1000 знаков, поэтому считывать его надо либо как строку, либо посимвольно и переводить символы в цифры, а затем считать две суммы.

@mbekesh · 07.12.2017, 09:21 **[ТС]**

напишите программу плиз.

@ZX Spectrum-128 · 08.12.2017, 14:01

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
var
  s: string;
  i: Integer;
  sn, sc: Int64;
 
begin
  readln(s);
  for i := 1 to length(s) do
    if odd(i) then
      sn := sn + StrToInt(s[i])
    else
      sc := sc + StrToInt(s[i]);
  if (sc - sn) mod 11 = 0 then
    writeln('Yes')
  else
    writeln('No');
end.

@кот Бегемот · 08.12.2017, 17:57

ZX Spectrum-128, не прокатит.
Во первых, в Паскале ABC нет int64, во-вторых, даже если бы и был, - 1000значное число не уместилось бы в int64.
В третьих, это не FreePascal, тысячезначное число не уместится в тип string.
Считывать надо посимвольно, а каждую частичную сумму заменять остатком от деления на 11

@ZX Spectrum-128 · 08.12.2017, 19:08

кот Бегемот, это ведь олимпиадная задача? Региональный уровень? Что-то похожее проскакивало.
Тогда мое "решение" с трудом пройдет минимальный набор тестов. Или вовсе не пройдет.

@кот Бегемот · 08.12.2017, 21:25

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

Новые блоги и статьи Все статьи Все блоги /
Знаешь почему 90% людей редко бывают счастливыми? kumehtar 14.04.2026 Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.	Фиксация колонок в отчете СКД Maks 14.04.2026 Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .	Настройки VS Code Loafer 13.04.2026 { "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .	Оптимизация кода на разграничение прав доступа к элементам формы Maks 13.04.2026 Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .
Контроль заполнения и очистка дат в зависимости от значения перечислений Maks 12.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .	Архитектура слоя интернета для сервера-слоя. Hrethgir 11.04.2026 В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .	Подстановка значения реквизита справочника в табличную часть документа Maks 10.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .	Очистка реквизитов документа при копировании Maks 09.04.2026 Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .

@mbekesh 0 / 0 / 0 Регистрация: 07.12.2017 Сообщений: 3

	Распределить всех детей в команды ровно по 11 человек 07.12.2017, 08:03. Показов 3415. Ответов 8 Метки нет (Все метки) помогите решить задачу, плиз Задача Имя входного файла: стандартный ввод Имя выходного файла: стандартный вывод Ограничение по времени: 1 секунда Ограничение по памяти: 256 мегабайт Так как, Арсен является тренером знаменитого футбольного клуба Арсенал, он решил позабо- титься о будущем клуба и объявил набор в футбольный кружок для юношей. Количество детей пришедших в кружок — n оказалось очень большим числом. Тем не менее, Арсен не хочет никого обидеть и хочет распределить всех детей в команды ровно по 11 человек. Получится ли у него? Формат входных данных В первой строке дано целое число n (1 ⩽ n ⩽ 101000) — количество детей пришедших в кружок. Формат выходных данных В первой строке выведите слово «YES» (без кавычек), если возможно всех распределить по командам, иначе, «NO» (без кавычек). 0

@кот Бегемот Платежеспособный зверь 8966 / 4389 / 1655 Регистрация: 28.10.2009 Сообщений: 11,647
	07.12.2017, 08:12
	Число делится на 11 тогда и только тогда, когда разность между суммой цифр стоящих на чётных местах и суммой цифр, стоящих на нечётных местах делится на 11 0

@кот Бегемот Платежеспособный зверь 8966 / 4389 / 1655 Регистрация: 28.10.2009 Сообщений: 11,647
	07.12.2017, 08:51
	У Вас число может быть 1000 знаков, поэтому считывать его надо либо как строку, либо посимвольно и переводить символы в цифры, а затем считать две суммы. 0

@mbekesh 0 / 0 / 0 Регистрация: 07.12.2017 Сообщений: 3
	07.12.2017, 09:21 [ТС]
	напишите программу плиз. 0

@кот Бегемот Платежеспособный зверь 8966 / 4389 / 1655 Регистрация: 28.10.2009 Сообщений: 11,647
	08.12.2017, 17:57
	ZX Spectrum-128, не прокатит. Во первых, в Паскале ABC нет int64, во-вторых, даже если бы и был, - 1000значное число не уместилось бы в int64. В третьих, это не FreePascal, тысячезначное число не уместится в тип string. Считывать надо посимвольно, а каждую частичную сумму заменять остатком от деления на 11 0

@ZX Spectrum-128 6812 / 4568 / 4820 Регистрация: 05.06.2014 Сообщений: 22,433
	08.12.2017, 19:08
	кот Бегемот, это ведь олимпиадная задача? Региональный уровень? Что-то похожее проскакивало. Тогда мое "решение" с трудом пройдет минимальный набор тестов. Или вовсе не пройдет. 0

@кот Бегемот Платежеспособный зверь 8966 / 4389 / 1655 Регистрация: 28.10.2009 Сообщений: 11,647
	08.12.2017, 21:25
	Для регионального уровня это слишком простая задача. А так вообще, да, задача повышенной сложности, слишком много тонкостей. 0