Лучшие помощники
- Megamozg 2200 б
- Matalya1 1800 б
- DevAdmin 1700 б
- arkasha_bortnikov 890 б
- Dwayne_Johnson 860 б
1 сентября 2022 21:48
340
Марш и Коп — всемирно известная пара враждующих археологов. В стремленииобогнать друг друга они собрали внушительные коллекции костей динозавров,
представляющих собой отрезки целочисленной длины. И у Марша, и у Копа
имеется ровно две кости длины 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
Несложно понять, что невозможно составить даже один
прямоугольник, удовлетворяющий условиям задачи, поэтому
ответ ноль
2
ответа
Ответ:
язык 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
·
Хороший ответ
1 сентября 2022 21:48
Остались вопросы?
Еще вопросы по категории Информатика
Запиши ответ Татьяна редактировала фотографию своей подруги. После выполненной работы она хотела отослать фотографию через специальный сервис, чтобы...
В неком текстовом процессоре можно использовать только один шрифт и два варианта начертания — полужирное начертание и курсив. Сколько различных начерт...
Пусть видеопамять компьютера имеет объём 512 кбайт.Размер географической сетки-640х480.Сколько страниц экрана одновременно разместятся в видеопамяти п...
3. Как вычислить мощность алфавита? 4. Сколько символов содержится в компьютерном алфавите?...
Какой логический элемент изображён на рисунке? дизъюнктор конъюнктор инвертор импликатор...
Все предметы