как записать программу в файл

[aank10]

как записать программу в файл тхт бат и другие

#include<stdio.h>
#include<conio.h>
#include<iostream.h>
#include<fstream.h>
#include<stdlib.h>
#include<windows.h>
char* Rus(const char* text){
char bufRus[256];
CharToOem(text, bufRus);
return bufRus;
}
main()
{
{ ofstream outClientFile("proba1.txt",ios::out);                 //
if (! outClientFile)                                                  //
cout<<(Rus("файл не может быть открыт"))<<endl;    //  вот тут пытаюсь 
exit(1);}                                                              //осуществить запись как это закончить

randomize();
int x[4][4],j,k,p=1,s=0;
for (j=0;j<4;j++)
{for (k=0;k<4;k++)
x[j][k]=rand() % 9 -rand() % 7;}  // рандомные числа
outClentFile.close();
cout<<(Rus("\nИсходный массив"));

for (j=0;j<4;j++)
{cout<<"\n";
for (k=0;k<4;k++)
printf("%3i",x[j][k]);}

cout<<(Rus("\n\n\nЭлементы выше побочной диагонали"));

for (j=0;j<4;j++)             //
{cout<<"\n";                  // вывод массива выше побочной диагонали
for (k=0;k<4-j;k++)           //
printf("%3i",x[j][k]);}

for (j=0;j<4;j++)
{for (k=0;k<4-j;k++)
{if (x[j][k]!=0)    // пропускаем 0 элементы
p=p*x[j][k];}}

cout<<(Rus("\nПроизведение элементов выше побочной диагонали = "))<<p;

cout<<(Rus("\n\nЭлеметы ниже главной диагонали"));

for (j=0;j<4;j++)
{cout<<"\n";
for (k=0;k<j+1;k++)
printf("%3i",x[j][k]);}

for (j=0;j<4;j++)
{cout<<"\n";
for (k=0;k<j+1;k++)
s=s+x[j][k];}
cout<<(Rus("сумма ниже главной диагонали"))<<s;

getch();
return 0;}

[Spawn™Production®]

Чего Вам именно записать надо? Скрипт сделать или чего?