PROGRAM ReadLn1(Input, Output);
    TYPE
        String5 = PACKED ARRAY[1..5] OF Char;
    VAR
        X: String5;
BEGIN
    ReadLn(Input);
    WriteLn(Output, '<', Input^, '>');
    ReadLn(Input, X);
    Write(Output, X);
END.