C++ :

#include <iostream>

using namespace std;

int main()
{

   cout<<"    "<<"809"<<endl;
   cout<<"   "<<"----"<<endl;
   cout<<"12)9709"<<endl;
   cout<<"   "<<"96"<<endl;
   cout<<"   "<<"----"<<endl;
   cout<<"    "<<"109"<<endl;
   cout<<"    "<<"108"<<endl;
   cout<<"   "<<"----"<<endl;
   cout<<"      "<<"1"<<endl;
}

Pascal :

begin
  writeln('    809');
  writeln('   ----');
  writeln('12)9709');
  writeln('   96');
  writeln('   ----');
  writeln('    109');
  writeln('    108');
  writeln('   ----');
  writeln('      1');
end.