Лучшие помощники
- Megamozg 2170 б
- Matalya1 1800 б
- DevAdmin 1685 б
- arkasha_bortnikov 775 б
- Dwayne_Johnson 755 б
26 декабря 2022 10:28
1119
Задача 1: Костяные войныМарш и Коп — всемирно известная пара враждующих археологов. В стремлении
обогнать друг друга они собрали внушительные коллекции костей динозавров,
представляющих собой отрезки целочисленной длины. И у Марша, и у Копа
имеется ровно две кости длины 1, ровно две кости длины 2 и так до бесконечности
(то есть, у каждого есть ровно две кости любой натуральной длины).
Однажды археологи решили примириться и в честь этого отдать в Смитсоновский
музей прямоугольник периметра P. Для этого и Марш, и Коп хотят пожертвовать на
строительство прямоугольника по одной паре одинаковых костей. Каким числом
способов они могут это сделать, если ломать кости археологи категорически не
согласны?
Входные данные
Программа получает на вход одно натуральное число P — периметр требуемого
прямоугольника (1 ≤ P ≤ 2×109
).
Выходные данные
Программа должна вывести одно целое число — количество способов
пожертвовать кости, чтобы из них можно было составить прямоугольник
периметра P.
Система оценки
Решение, правильно работающее для P ≤1000, наберёт не менее 60 баллов.
Примеры
Ввод Вывод Пояснение
10 4
Марш и Коп могут пожертвовать соответственно кости длины 1
и 4; 2 и 3; 3 и 2; 4 и 1 — всего 4 способа. Заметим, что из них
сложатся прямоугольники 1×4, 2×3, 3×2 и 4×1 соответственно.
2 0
Несложно понять, что невозможно составить даже один
прямоугольник, удовлетворяющий условиям задачи, поэтому
ответ ноль
1
ответ
Ответ:
язык pascal abc, 100 баллов
Объяснение:
var P:integer;
begin
Readln(P);
if (P mod 2 = 0) and (P>2) then
writeln(P/2-1)
else Writeln (0)
end.
язык pascal abc, 100 баллов
Объяснение:
var P:integer;
begin
Readln(P);
if (P mod 2 = 0) and (P>2) then
writeln(P/2-1)
else Writeln (0)
end.
0
·
Хороший ответ
28 декабря 2022 10:28
Остались вопросы?
Еще вопросы по категории Информатика
Как нарисовать цилиндр в паскале при том Что ввод высоты и радиуса окружности вводится с клавиатуры(обязательно!)...
Имеются данные о количестве полных лет трёх призёров спартакиады. Напишите программу выбирающую и выводящую возраст самого младшего призёра....
в бутылке стакане кувшине и банке находятся молоко лимонад квас и вода известно что вода и молоко не в бутылке сосуд с лимонадом стоит между кувшином...
Миша соединил последовательно несколько резисторов (см. схему участка цепи AB). Схема участка цепи АВ №ОбозначениеНоминал (Ом) 1R1 12 2R2 15 3R3...
Вася шифрует русские слова, записывая вместо каждой буквы её код.: А(01) В(011) Д(100) О(111) Р(010) У(001) Некоторые цепочки можно расшифровать...
Все предметы