Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 04.12.2015, 15:56   #1
Анастасия1223
Новичок
Джуниор
 
Регистрация: 04.12.2015
Сообщений: 1
Лампочка Настольный теннис

Ограничение по времени, сек 1
Ограничение по памяти, мегабайт 64
на языке-паскаль
В настольном теннисе в результате каждой подачи разыгрывается одно очко. Подача переходит от игрока к игроку каждые 5 подач, т.е. первые пять раз подает первый игрок, затем 5 раз — второй, затем снова первый и т.д.

Партия играется до тех пор, пока кто-нибудь из игроков не наберет 21 очко. Тот, кто набрал 21 очко, признается победителем, и игра заканчивается.

Вася и Петя играли в игру, и забыли, кто должен подавать в данный момент. Однако они помнят, что первую подачу делал Вася, и счет в настоящий момент a:b (a очков у Васи и b очков у Пети). Напишите программу, которая по данным a и b будет определять, чья подача или устанавливать, что игра закончена.

Входные данные
Вводятся два числа a и b. Числа соответствуют реальному счету, т.е. оба числа целые, от 0 до 21 и не равны 21 одновременно.

Выходные данные
Выведите одно из четырех сообщений:
· Vasya serves — если сейчас должен подавать Вася
· Petya serves — если сейчас должен подавать Петя
· Vasya wins — если игра завершена и выиграл Вася
· Petya wins — если игра завершена и выиграл Петя
Примеры
входные данные
4 1
выходные данные
Petya serves
входные данные
15 0
выходные данные
Petya serves
входные данные
21 12
выходные данные
Vasya wins
Анастасия1223 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Разрабатываем игру теннис DeKot Gamedev - cоздание игр: Unity, OpenGL, DirectX 28 28.10.2011 19:05
Теннис uTorrent Общие вопросы C/C++ 3 13.06.2011 02:55
Игра Теннис на C# uTorrent C# (си шарп) 2 15.05.2011 20:37
Помогите доделать теннис с примерами nanobond Gamedev - cоздание игр: Unity, OpenGL, DirectX 23 15.07.2009 04:43
настольный теннис sverhuVniz Паскаль, Turbo Pascal, PascalABC.NET 3 15.11.2008 15:59