out<"This works well"<h<g;out.close();izstreamin("temp.gz");// read it backchar*x=read_string(in),*y=newchar[256],z[256];in>y>z;in.close();cout<<x<<endl<<y<<endl<<z<<endl;out.open("temp.gz");// try ascii output; zcat temp.gz to see the resultsout<<setw(50)<<setfill('#')<<setprecision(20)<<x<<endl<<y<<endl<<z<<endl;out<<z<<endl<<y<<endl<<x<<endl;out<<1.1234567890123456789<<endl;delete[]x;delete[]y;}