(@v[0..3],$n)=glob<>;
@a=($v[0],0,0,0);
$n=$n%4+32if$n>=32;
for$i(0..$n-1){
	*x=\$a[$i+1&3];
	*y=\$a[$i&3];
	*z=\$v[$i+1&3];
	$x+=$y,$y=0;
	$y=$x-$z,$x=$z if $x>$z;
}
print"@a";