#!/usr/local/bin/perl

print "c\n";

# necessary to flush stdout.
$| = 1;

while (<>) {
    chop;

    $opponent = $_;

    print "c\n";
}