Миссия простая: нужно либо накопить c кредитов, либо сокрушить врага в этом регионе

@DefAster78boom · Регистрация: 09.12.2017

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

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

Изначально у нас нет ни одного кредита и ни одного отряда пехоты. Но есть база и гарантия того, что враг нас не обнаружит, пока мы на него не нападём.

На нашей базе можно хранить не более x кредитов. Чтобы хранить больше, нужно строить хранилища: каждое стоит y (y≤x) кредитов и в каждом можно будет хранить дополнительно по максимум z кредитов. Строительство моментально (а вы что, реализма ожидали?).

Через каждые m минут нам привозят добычу на s кредитов. Добыча моментально конвертируется в кредиты и мы перераспределяем новые s кредитов и кредиты, имеющиеся на базе, по трём направлениям: строительство хранилищ, наём отрядов пехоты, хранение на базе. Количество кредитов, отданных на строительство хранилищ, должно быть кратно стоимости постройки одного хранилища. Количество кредитов, отданных на наём отрядов пехоты, должно быть кратно стоимости наёма одного отряда пехоты. Если мы отдаём на хранение больше кредитов, чем может храниться на базе (хранилища, на строительство которых мы только что отдали кредиты, тоже учитываются), то излишки кредитов исчезают.

Если после очередного описанного выше распределения на базе будет храниться хотя бы c кредитов, то считается, что мы накопили c кредитов, и миссия считается пройденной.

Один отряд пехоты стоит f (f≤x) кредитов. Сразу после оплаты, которая тоже моментальна, отряд будет ждать приказаний на нашей базе.

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

По данным разведки, на вражеской базе e отрядов, а добраться до вражеской базы наши отряды пехоты смогут за t минут (все отряды, независимо от их количества, могут идти вместе).

За сколько в лучшем случае мы завершим миссию?

@Ksardas_178 · 16.10.2019, 02:14

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
var
  n, a, b, x, y, z, f, e, m, s, t, c: Integer;
  tx:text;
  SpM:real;
 
begin
  assign(tx, 'task.txt');
  tx.Reset;
  x := tx.ReadInteger;
  y := tx.ReadInteger;
  z := tx.ReadInteger;
  f := tx.ReadInteger;
  e := tx.ReadInteger;
  m := tx.ReadInteger;
  s := tx.ReadInteger;
  t := tx.ReadInteger;
  c := tx.ReadInteger;
  
  //(e+1)f - нужно отрядов для победы. Тогда победа через [(e+1)*f/s]*m+t минут
  a := ceil((e + 1) * f / s) * m + t;
  
  //n - количество хранилищ для финансового доминирования
  n := ceil((c - x) / z);
  
  //x+ny - количество сохраненных денег, и nz потратили на постройку хранилищ. Считаем время постройки
  b := ceil((x+n*(z+y)) / s) * m;
  //Прибавим время заполнения построенных хранилищ
  b +=ceil((n*y+x)/s)*m;
  
  println(min(a,b));
  
  tx.Close;
end.

txt:

Pascal
1
100 20 10 20 5 5 50 60 200

Добавлено через 23 минуты
Вот, вот так вот надо. Я все не могу с первого раза нормально решить и проверить себя. Обещаю исправиться)

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
var
  n, a, b, x, y, z, f, e, m, s, t, c: Integer;
  tx: text;
  SpM: real;
 
begin
  assign(tx, 'task2.txt');
  tx.Reset;
  x := tx.ReadInteger;
  y := tx.ReadInteger;
  z := tx.ReadInteger;
  f := tx.ReadInteger;
  e := tx.ReadInteger;
  m := tx.ReadInteger;
  s := tx.ReadInteger;
  t := tx.ReadInteger;
  c := tx.ReadInteger;
  
  //(e+1)f - нужно отрядов для победы. Тогда победа через [(e+1)*f/s]*m+t минут
  a := ceil((e + 1) * f / s) * m + t;
  
  //n - количество хранилищ для финансового доминирования
  n := ceil((c - x) / z);
  
  //ny потратили на постройку хранилищ. c - стоимость загрузки. Всего:
  b := ceil((c + n*y) / s) * m;
  
  println(min(a, b));
  
  tx.Close;
end.

@HasmoneaN · 16.10.2019, 13:59

@Ksardas_178 Ваше решение выдает не верный ответ при входных данных
c=76;x=98;y=45;z=1;m=24;s=1;f=34;e=34;t= 34

@Ksardas_178 · 16.10.2019, 16:19

HasmoneaN, да, неверно организован подсчёт количества докупаемых хранилищ. Можно дописать что-то вроде

Pascal
1
if n<0 then n:= 0;

Добавлено через 4 минуты

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
var
  n, a, b, x, y, z, f, e, m, s, t, c: Integer;
  tx: text;
  SpM: real;
 
begin
  assign(tx, 'task2.txt');
  tx.Reset;
  x := tx.ReadInteger;
  y := tx.ReadInteger;
  z := tx.ReadInteger;
  f := tx.ReadInteger;
  e := tx.ReadInteger;
  m := tx.ReadInteger;
  s := tx.ReadInteger;
  t := tx.ReadInteger;
  c := tx.ReadInteger;
  
  //(e+1)f - нужно отрядов для победы. Тогда победа через [(e+1)*f/s]*m+t минут
  a := ceil((e + 1) * f / s) * m + t;
  
  //n - количество хранилищ для финансового доминирования
  If c>x then n := ceil((c - x) / z);
  
 
  //ny потратили на постройку хранилищ. c - стоимость загрузки. Всего:
  b := ceil((c + n*y) / s) * m;
  
  println(min(a, b));
  
  tx.Close;
end.

@Temchik16 · 16.10.2019, 20:16

HasmoneaN, Ksardas_178,

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
var
  n, a, b, x, y, z, f, e, m, s, t, c: real;
 
  SpM: real;
 
begin
  read(c ,x, y, z, m, s, f, e, t);
 
  a := ceil((e + 1) * f / s) * m + t;
  
  
  n := ceil((c - x) / z);
 
 if n<0 then n:= 0; 
 
  b := ceil((c + n*y) / s) * m;
  
  println(min(a, b));
  
end.

Добавлено через 6 минут
HasmoneaN, Ksardas_178,

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
var
  n, a, b, x, y, z, f, e, m, s, t, c: real;
 
  SpM: real;
 
begin
  read(c ,x, y, z, m, s, f, e, t);
 
  a := ceil((e + 1) * f / s) * m + t;
  
  
  n := ceil((c - x) / z);
 
 if n<0 then n:= 0; 
 
  b := ceil((c + n*y) / s) * m;
  
  println(min(a, b));
  
end.

@vlad558325205 · 17.10.2019, 11:53

Temchik16, решение проходит не все тесты, т.к в одном из тестов ответ другой.

@Temchik16 · 17.10.2019, 12:30

vlad558325205, знаю пока но 1 задание проходит нормально. Сейчас работаю над улучшением для работы с большими числами

Новые блоги и статьи Все статьи Все блоги /
Thinkpad X220 Tablet — это лучший бюджетный ноутбук для учёбы, точка. Programma_Boinc 23.12.2025 Рецензия / Мнение/ Перевод Ниже машинный перевод статьи The Thinkpad X220 Tablet is the best budget school laptop period . Thinkpad X220 Tablet — это лучший бюджетный ноутбук для учёбы,. . .	PhpStorm 2025.3: WSL Terminal всегда стартует в ~ and_y87 14.12.2025 PhpStorm 2025. 3: WSL Terminal всегда стартует в ~ (home), игнорируя директорию проекта Симптом: После обновления до PhpStorm 2025. 3 встроенный терминал WSL открывается в домашней директории. . .	Как объединить две одинаковые БД Access с разными данными VikBal 11.12.2025 Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.	Новый ноутбук volvo 07.12.2025 Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro	Музыка, написанная Искусственным Интеллектом volvo 04.12.2025 Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .
От async/await к виртуальным потокам в Python IndentationError 23.11.2025 Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .	Поиск "дружественных имён" СОМ портов Argus19 22.11.2025 Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .	Сколько Государство потратило денег на меня, обеспечивая инсулином. Programma_Boinc 20.11.2025 Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .	Ломающие изменения в C#.NStar Alpha Etyuhibosecyu 20.11.2025 Уже можно не только тестировать, но и пользоваться C#. NStar - писать оконные приложения, содержащие надписи, кнопки, текстовые поля и даже изображения, например, моя игра "Три в ряд" написана на этом. . .	Мысли в слух kumehtar 18.11.2025 Кстати, совсем недавно имел разговор на тему медитаций с людьми. И обнаружил, что они вообще не понимают что такое медитация и зачем она нужна. Самые базовые вещи. Для них это - когда просто люди. . .

@DefAster78boom 0 / 0 / 0 Регистрация: 09.12.2017 Сообщений: 46

	Миссия простая: нужно либо накопить c кредитов, либо сокрушить врага в этом регионе 15.10.2019, 23:40. Показов 3608. Ответов 6 Метки нет (Все метки) Миссия простая: нужно либо накопить c кредитов (читайте: единиц вымышленной валюты), либо сокрушить врага в этом регионе. Миссия проходная и не интересная (даже никаких юнитов кроме пехоты), так что надо её закрыть побыстрее. Изначально у нас нет ни одного кредита и ни одного отряда пехоты. Но есть база и гарантия того, что враг нас не обнаружит, пока мы на него не нападём. На нашей базе можно хранить не более x кредитов. Чтобы хранить больше, нужно строить хранилища: каждое стоит y (y≤x) кредитов и в каждом можно будет хранить дополнительно по максимум z кредитов. Строительство моментально (а вы что, реализма ожидали?). Через каждые m минут нам привозят добычу на s кредитов. Добыча моментально конвертируется в кредиты и мы перераспределяем новые s кредитов и кредиты, имеющиеся на базе, по трём направлениям: строительство хранилищ, наём отрядов пехоты, хранение на базе. Количество кредитов, отданных на строительство хранилищ, должно быть кратно стоимости постройки одного хранилища. Количество кредитов, отданных на наём отрядов пехоты, должно быть кратно стоимости наёма одного отряда пехоты. Если мы отдаём на хранение больше кредитов, чем может храниться на базе (хранилища, на строительство которых мы только что отдали кредиты, тоже учитываются), то излишки кредитов исчезают. Если после очередного описанного выше распределения на базе будет храниться хотя бы c кредитов, то считается, что мы накопили c кредитов, и миссия считается пройденной. Один отряд пехоты стоит f (f≤x) кредитов. Сразу после оплаты, которая тоже моментальна, отряд будет ждать приказаний на нашей базе. Проще и быстрее всего избавиться от врага в этом регионе – заставить его капитулировать. Для этого нужно привести к стенам вражеской базы больше отрядов пехоты, чем есть на вражеской базе. По данным разведки, на вражеской базе e отрядов, а добраться до вражеской базы наши отряды пехоты смогут за t минут (все отряды, независимо от их количества, могут идти вместе). За сколько в лучшем случае мы завершим миссию? 0

@HasmoneaN 2 / 2 / 0 Регистрация: 23.03.2016 Сообщений: 24
	16.10.2019, 13:59
	@Ksardas_178 Ваше решение выдает не верный ответ при входных данных c=76;x=98;y=45;z=1;m=24;s=1;f=34;e=34;t= 34 0

@vlad558325205 0 / 0 / 0 Регистрация: 17.10.2019 Сообщений: 2
	17.10.2019, 11:53
	Temchik16, решение проходит не все тесты, т.к в одном из тестов ответ другой. 0

@Temchik16 0 / 0 / 0 Регистрация: 15.10.2019 Сообщений: 7
	17.10.2019, 12:30
	vlad558325205, знаю пока но 1 задание проходит нормально. Сейчас работаю над улучшением для работы с большими числами 0