let rec print a b =
	if String.length a <> 0 then begin
		print_char a.[0];
		print b (Str.string_after a 1)
	end else 
		print_newline ()

let () =
	let o = read_line () in
	let e = read_line () in
	print o e
