#define _USE_MATH_DEFINES
#include <cstdio>
#include <cstdlib>
#include <cstring>
#include <cmath>
#include <climits>
#include <cfloat>
#include <ctime>
#include <cassert>
#include <map>
#include <utility>
#include <set>
#include <iostream>
#include <memory>
#include <string>
#include <vector>
#include <algorithm>
#include <functional>
#include <sstream>
#include <complex>
#include <stack>
#include <queue>
#include <numeric>
#include <list>
#include <iomanip>
#include <iterator>

using namespace std;

typedef long long ll;
typedef pair<int,int> Pii;
typedef pair<ll,ll> Pll;
 
int a[100],b[100],c[100];

int main(){
	for (int i = 1; i < 100; i++)
		a[i] = b[i] = c[i] = 10000;
	for (int i = 0; i <= 50; i++){
		if(i%2==0)
			a[i] = (i/10) * (380 * 5 * 4 / 5) + 380 * ((i%10)/ 2);
		if(i%3==0)
			b[i] = (i/12) * (550 * 4 * 85/ 100) + 550 * ((i%12)/3);
		if(i%5==0)
			c[i] = (i/15) * (850 * 3 * 88/ 100) + 850 * ((i%15)/5);
	}
	int n;
	while(cin>>n,n){
		n /= 100;
		int ans = (int)1e8;
		for (int i = 0; i <= n; i++){
			for (int j = 0; j <= n-i; j++){
				ans = min(ans,a[i]+b[j]+c[n-i-j]);
			}
		}
		cout << ans << endl;
	}

    return 0;
}