降低SRTM3数据点密度

代码说明：

应用背景从SRTM3网站上下载下来的数据，点密度太大，给使用带来不便，程序目的是降低点密度，使其分辨率降低，通过相邻点删除的方式，使其分辨率降低，但仍然保持原来点方阵的格式，例如，原来是n×n，即n行n列，降低密度后，变为原来的一半。n/2*n/2，即n/2行，n/2列。如果n为偶数，则n/2=int（n/2）+1关键技术 程序分两个 separate_jshu.f 和 separate_oushu.f 。输入文件分别为 Input_jshu.dat 和 Input.dat. 即，当原文件 n×n中n为奇数时，使用前一个程序，新生成的文件为 jishu.dat. 新生成行列为 n/2=int（n/2）+1。当原件n×n 中 n 为偶数时，使用后一个文件，新生成文件为 oushu.dat 新生成行列为 n/2.