program number5;

var
   inFile, outFile:text;

   inte, iCount:integer;

{function LineCheck(stri:string; var integery:integer;):boolean;
var
   iCount, count:integer;
begin
     count := 0;
     for iCount := 1 to 10 do
         if stri[iCount] <> '.' then
            count := count  + 1;
     if count = 0 then
        LineCheck := false
     else
         LineCheck := true;
end;

procedure StringCheck;
var
   iCount:integer;
begin
    for iCount := 1 to 6 do begin
        if LineCheck(arrayT[iCount]) then begin


        end;
    end;
end; }

begin
     randomize;
     assign(outFile, 'OUT5.txt');
     rewrite(outFile);
        {
     for iCount := 1 to 5 do
         readln;readln;readln;readln;
         for iCount2 := 1 to 6 do
             readln(inFile, arrayT[iCount2]);
         stringCheck;}
     inte:= random(3) +1;
     for iCount := 1 to 5 do writeln(outFile, inte);
     close(outFile);

end.