Два игрока, Петя и Ваня, играют в следующую игру. Перед игроками лежит куча камней. Игроки ходят по - id1501300620211028 от ЛблюЗнания 28.10.2021 16:26

Question

Информатика: Два игрока, Петя и Ваня, играют в следующую игру. Перед игроками лежит куча камней. Игроки ходят по очереди, первый ход делает Петя. За один ход игрок может добавить в кучу один камень, или увеличить количество камней в куче в 2 раза. Например, имея кучу из 15 камней, за один ход можно получить кучу из 16 или 30 камней. У каждого игрока, чтобы делать ходы, есть неограниченное количество камней. Игра завершается в тот момент, когда количество камней в куче становится не менее 52. Кто выиграет, если

ЛблюЗнания · Accepted Answer

Var A,R:integer; Begin WriteLn( Выберите тип единицы измерения времени: 1 - секунда, 2 - минута, 3 - час, 4 - сутки, 0 - выход. ); ReadLn(R); While R 0 do    Begin    Write( Введите значение этой единицы времени: );    ReadLn(A);    Case R of    1:WriteLn(A, сек = ,(A/60):0:3, мин = ,(A/3600):0:3, ч = ,(A/86400):0:3, сут );    2:WriteLn(A, мин = ,(A/60):0:3, ч = ,(A/1440):0:3, сут = ,A*60, сек );    3:WriteLn(A, ч = ,(A/24):0:3, сут = ,A*3600, сек = ,A*60, мин );    4:WriteLn(A, сут = ,A*24, ч =...

MOGZ ответил