//fpc 3.0.0

program Unicorn;
var
first : string;
second : string;
begin
    writeln('bonjour chere aventurier , est tu prêt a m aider.');
    writeln('Répond a ce quizz.');
    writeln('Aimes tu les licornes.');
    read(first);

    if (first = 'no')then
    begin
        writeln('ok tu vas mourrir de la main de ma licornes');
        readln;
    end;

    if(first = 'yes')then
    begin
        writeln('Ok cool , on a des point commun.');
        readln;
    end;
      writeln('la prochaine, Aimes tu les bonbons.');
      read(second);
        if (second = 'yes')then
        begin
            writeln('Super je vais quand même te tuer  car j ai plus de question.');
            readln;
        end;
        if (second = 'no') then
        begin
         writeln('!!!!YOU ARE DEAD!!!!!!');
         readln;
        end;
end.