C++ :

#include<iostream>
#include<cstdio>
using namespace std;
int main()
{
	int head,foot;
	cin>>head>>foot;
	int j,t;
	j=2*head;
	t=(foot-j)/2;
	j=head-t;
	cout<<j<<' '<<t<<endl;
	return 0;	
}

Pascal :

var  a,b,c,d:integer;
begin
  readln(a,b);
  c:=(a*4-b) div 2;
  d:=(b-c*2) div 4;
  write(c,' ',d);
end.