#!/usr/bin/perl

@input = <STDIN>;
print @input;
print &max(@input);

sub max
{
	my($m, $n) = @_;
	if($m > $n){ $m } else{ $n };
}