(*
 *
 * jmeno: max
 * popis: najde maximalni prvek posloupnosti
 * level: 0
 * 
 * zadani:
 * 	V posloupnosti nenulovych celych cisel najdete maximalni.
 *	Posloupnost je ukoncena cislem 0 (ktere se nepocita).
 *	Pokud takove cislo neexistuje vytiskne se 0.
 * input:
 *  	Jedno zadani na radku. Zadani ma tvar:
 *.	N: [cisla oddelena mezerou] 0
 *
 * output:
 *.	N: max 
 *
 * soubory:
 *   max.pas, max.out, max.in
 *
 * au: vitas@popelka.ms.mff.cuni.cz
 * cp: gpl
 *
 *)

var
	{ cislo zadani  }
	Z: Integer;
	{ dvojtecka }
	dt: Char;

	max: Integer;
	x: Integer;
begin
	repeat
		read(Z, dt, dt);
		write(Z, ': ');

		read(x);
		max := x;
		while x <> 0 do begin
			if x > max then
				max := x;
			read(x)
		end;
		writeln(max);
	until Z = 0;
end.