program LifeIsStrange_typeOShit;
Uses WinCrt;
Var
a,b,c,d,e,f,g,h,i,j,k,l,m,n : string;
esmek : string;
age: Integer;
Begin;

WriteLn('Hello stranger, what is your Name?');
readln(esmek);
writeln('Oh, that is an interesting Name ',esmek,' nice to  meet you I am arfizato.');
writeln('do you want to hang out? maybe we ll get to  know each  other better..');
writeln('                    YES/NO');
readln(a);
    if a='yes' then
        Begin;
        WriteLn('Oh! I didn t expect you to  say yes honestly... umm so how old are you  ?');
        readln(age);
            if age in[10..15] Then
            WriteLn('WHOAH! you look older than you actually are , even your voice sounds deeper than the usual ',age,' year olds')
            Else
            if age in[16..18] then
            WriteLn('comparing to boys your age you look pretty handsom.')
            Else
            if age>18 Then
            writeln('i am too ',age,' what a coincidence!!');
        WriteLn('So are you into gaming or not ?') ;
        WriteLn('         YES/NO');
        readln(c);
            If c='yes' Then
            WriteLn('Thats pretty awesome I am too')
            Else
            If c = 'no' Then
                Begin;
            WriteLn('What do like then ?');
            readln(d);
            WriteLn('Yeah, whatever...');
                End
        End
    Else
    WriteLn('whatever go suck on a pillow or something');
End.