Карти - Форум

Карти

snaper1993

Дата: Среда, 28.11.2007, 02:02 | Сообщение # 1

Бывалый

Группа: Пользователи

Сообщений: 121

Репутация: 2

Замечания: 0%

Статус: Offline

В мини-шахматах произошла патова ситуация, и фермеры решили поиграть у карты.
Карта имеет две характеристики: ранг R (6,7,8,9,10,J,Q,K,A) и масть M (P, T, C, B). Карты имеют старшинство соответственно рангу: шестерка (6) - наиболее молодая карта, туз (А) - старейшая. Покрыть карту можно или старшей картой такой же масти, или картой козырной масти, если карта, которую кроют, одна не является козырной - в таком случае ее можно покрыть лишь старшим козырем.Определить, кроет ли карта (R1,M1) карту (R2,M2), если козырь K.
Входные данные: в первой строке файла CARDS.DAT записанный символ K - козырная масть; в следующих строках - символы R1, M1, R2, M2, каждый в отдельной строке - ранг и масть первой и второй карт соответственно.
Исходные данные: в первую строку текстового файла CARDS.RES вывести YES, если первая карта кроет другу, или NO в противном случае.
Пример файлa CARDS.DAT:
P
A
T
6
C
Пример файла CARDS.RES:
NO

Добавлено (27.11.2007, 19:02)
---------------------------------------------
ну помогите пожалуста!!

Я - желанный гость Сайта взаимопомощи программистам Pascal А ты?