27
/*
//вывод в файл MatLAB:
fstream m;
m.open("shema1 10 10.m", ios::out);
m<<"% задача 1 схема 1 размер 10 10"<<endl;
m<<"T = [ ";
for(t=0; t<nt; t++){
m<<T[t]<<" ";
}
m<<"];"<<endl;
m<<"X = [ ";
for(i=0; i<nx; i++){
m<<X[i]<<" ";
}
m<<"];"<<endl;
m.close();
*/
//вывод в файл Excel:
fstream ex;
ex.open("kr_nik shema1 10 10.xls", ios::out);
ex.precision(6);
ex<<"Кронекера-Николсона, Схема 1, размер 10 10"<<endl;
ex<<"Исходные данные:"<<endl;
ex<<"T=\t"<<nt-1<<"\tK=\t"<<nx-1<<"\ta=\t"<<a<<endl;
ex<<"h=\t"<<dx<<"\tt=\t"<<dt<<endl<<endl;
ex<<"t/x\t";
for(i=0; i<nx; i++){
ex<<X[i]<<"\t";
}
ex<<endl;
for(t=0; t<nt; t++){
ex<<T[t];
for(i=0; i<nx; i++){
ex<<"\t"<<U[t][i];
}
ex<<endl;
}
ex<<endl;
ex<<"Аналитическое решение:"<<endl;
ex<<"t/x\t";
for(i=0; i<nx; i++){
