#include <bits/stdc++.h>

#define rep(i, n) for (int i = 0; i < int(n); i++)
#define rrep(i, n) for (int i = int(n) - 1; i >= 0; i--)
#define reps(i, n) for (int i = 1; i <= int(n); i++)
#define rreps(i, n) for (int i = int(n); i >= 1; i--)
#define repc(i, n) for (int i = 0; i <= int(n); i++)
#define rrepc(i, n) for (int i = int(n); i >= 0; i--)
#define repi(i, a, b) for (int i = int(a); i < int(b); i++)
#define repic(i, a, b) for (int i = int(a); i <= int(b); i++)
#define each(x, y) for (auto &x : y)
#define all(a) (a).begin(), (a).end()
#define bit(b) (1ll << (b))

using namespace std;

using i32 = int;
using i64 = long long;
using u64 = unsigned long long;
using f80 = long double;
using vi32 = vector<i32>;
using vi64 = vector<i64>;
using vu64 = vector<u64>;
using vf80 = vector<f80>;
using vstr = vector<string>;

inline void yes() { cout << "Yes" << '\n'; exit(0); }
inline void no() { cout << "No" << '\n'; exit(0); }
inline i64 gcd(i64 a, i64 b) { if (min(a, b) == 0) return max(a, b); if (a % b == 0) return b; return gcd(b, a % b); }
inline i64 lcm(i64 a, i64 b) { return a / gcd(a, b) * b; }
inline u64 xorshift() { static u64 x = 88172645463325252ull; x = x ^ (x << 7); return x = x ^ (x >> 9); }
void solve(); int main() { ios::sync_with_stdio(0); cin.tie(0); cout << fixed << setprecision(16); solve(); return 0; }
template <typename T> class pqasc : public priority_queue<T, vector<T>, greater<T>> {};
template <typename T> class pqdesc : public priority_queue<T, vector<T>, less<T>> {};
template <typename T> inline void amax(T &x, T y) { if (x < y) x = y; }
template <typename T> inline void amin(T &x, T y) { if (x > y) x = y; }
template <typename T> inline T power(T x, i64 n, T e = 1) { T r = e; while (n > 0) { if (n & 1) r *= x; x *= x; n >>= 1; } return r; }
template <typename T> istream& operator>>(istream &is, vector<T> &v) { each(x, v) is >> x; return is; }
template <typename T> ostream& operator<<(ostream &os, vector<T> &v) { rep(i, v.size()) { if (i) os << ' '; os << v[i]; } return os; }
template <typename T, typename S> istream& operator>>(istream &is, pair<T, S> &p) { is >> p.first >> p.second; return is; }
template <typename T, typename S> ostream& operator<<(ostream &os, pair<T, S> &p) { os << p.first << ' ' << p.second; return os; }

void solve() {
  int mmm = 0;
  while (true) {
    int n; cin >> n;
    if (n == 0) return;
    if (mmm++ > 0) cout << '\n';
    int x, y, z, w; cin >> x >> y >> z >> w;
    int ans = 1e9;
    int a, b, c, d;
    repc(i, x) repc(j, y) repc(k, z) repc(l, w) {
      int sum = i * 10 + j * 50 + k * 100 + l * 500;
      if (sum < n) continue;
      sum -= n;
      int cnt = x - i + y - j + z - k + w - l;
      if (l > 0 && sum / 500 > 0) continue; cnt += sum / 500; sum %= 500;
      if (k > 0 && sum / 100 > 0) continue; cnt += sum / 100; sum %= 100;
      if (j > 0 && sum /  50 > 0) continue; cnt += sum /  50; sum %=  50;
      if (i > 0 && sum /  10 > 0) continue; cnt += sum /  10;
      if (ans >= cnt) {
        ans = cnt;
        a = i, b = j, c = k, d = l;
      }
    }
    if (a != 0) cout <<  10 << " " << a << '\n';   
    if (b != 0) cout <<  50 << " " << b << '\n';   
    if (c != 0) cout << 100 << " " << c << '\n';   
    if (d != 0) cout << 500 << " " << d << '\n';   
  }
}



Measured memory_bytes: 3160