package main

import . "fmt"
import . "slices"

func main() {
	var n,a,b,c int
	Scan(&n,&a,&b,&c)
	dp := make([]int, n+1)
	for  i := 0; i < n; i++ {
		if i+3 < len(dp) {
			dp[i+3] = max(dp[i+3],dp[i]+a)
		}
		if i+5 < len(dp) {
			dp[i+5] = max(dp[i+5],dp[i]+b)
		}
		if i+10 < len(dp) {
			dp[i+10] = max(dp[i+10],dp[i]+c)
		}
	}
	Println(Max(dp))
}