package main

import (
	"bufio"
	"fmt"
	"os"
	"sort"
	"strconv"
	"strings"
)

func getIntList(sc *bufio.Scanner) []int {
	sc.Scan()
	input := strings.Split(sc.Text(), " ")
	result := make([]int, len(input))
	for i, v := range input {
		if j, e := strconv.Atoi(v); e != nil {
			panic(e)
		} else {
			result[i] = j
		}
	}
	return result
}

func main() {
	var l, n int
	fmt.Scan(&l, &n)
	sc := bufio.NewScanner(os.Stdin)
	wList := getIntList(sc)
	sort.Ints(wList)
	boxesNum := 0
	for boxesWidth := 0; ; {
		if boxesNum < n && boxesWidth+wList[boxesNum] <= l {
			boxesNum++
		} else {
			break
		}
	}
	fmt.Print(boxesNum)
}