$c=<>;
$n=<>;
$/=$";@a=<>;
@d=(-1)x($c+1);

for$a(@a){
	$d[$a]=1;
	for$i($a+1..$c){
		if($d[$i-$a]>0 && ($d[$i]<0||$d[$i]>$d[$i-$a]+1) ){
			$d[$i]=$d[$i-$a]+1;
		}
	}
}
print $d[$c];