type
  RP = record
    name: string;
		val: integer;
	end;
var
  p,g: integer;
	i: integer;
	f: text;
	c: char;
	a: array[0..100] of RP;

function getVal(s: string): integer;
var
  i: integer;
begin
  getVal := 0;
  for i := 0 to p-1 do if a[i].name = s then begin
    getVal := a[i].val;
		break;
	end;
end;
var
  name: string;
	d: integer;
	r: integer;
	dd: double;
	pp,pt: integer;
	
	cor: boolean;
begin
  assign(f, 'ballot.in');
	reset(f);
  
  readln(f,p,g);
  for i := 0 to p-1 do begin
    a[i].name := '';
		read(f,c);
		while c <> ' ' do begin
      a[i].name := a[i].name+c;
			read(f,c);
		end;
		readln(f,dd);
		a[i].val := round(dd*10);
  end;
  for i := 1 to g do begin
    read(f,c);
		r := 0;
		d := 0;
		while (c <> '=') and (c <> '<') and (c <> '>') do begin
		  r := r+d;
			name := '';
			while c <> ' ' do begin
				name := name+c;
				read(f,c);
			end;
			d := getVal(name);
			read(f,c);
		end;
		r := r+d;
		case c of 
			'=': 	begin
							readln(f,pp);
							cor := r = pp*10;
						end;
			'>':  begin
							read(f,c);
							readln(f,pp);
							case c of 
								' ': cor := r > pp*10;
								'=': cor := r >=pp*10;
							end;
						end;
			'<':	begin
							read(f,c);
							case c of
								' ': cor := r < pp*10;
								'=': cor := r <= pp*10;
							end;
						end;
		end;
		write('Guess #',i,' was ');
		if cor then writeln('correct.') 
		else writeln('incorrect.');
	end;
end.