=$god_n; $j--){ $sel.=' '.$j.""; for ($i=0; $i<12; $i++) { $g=substr($data,$x+5+9*$i,8); if ($g==' -999.0'){ $sel.='-';} else{ settype($g,"float"); $a=$sko[$i]; settype($a,"float"); $a=round($g-$a,1); settype($a,"string"); settype($g,"string"); $sel.=''.$g.'
'.$a.''; } } $sel.= ""; $x=$x-115; } return $sel; } function meciac($n){ //формирование таблицы global $mas1,$mas3,$data,$god_k,$god_n,$sko; global $static,$otk; for($i=0;$i<12;$i++){$sko[$i]='-';} $name=$mas3[$n].name_statistik().indeks(); $nach=""; $nach.=""; for ($nk=0; $nk<=11; $nk++){ //колонки с месяцами $nach .=""; } $nach.=""; for ($nk=0; $nk<=11; $nk++){ //колонки с месяцами $nach .=""; } $nach.=""; $kon="
Года".$mas1[$nk]."
Ф/А

"; $ser=' '; $ser=mec_str($name); $ss="СКО"; for ($i=0;$i<12;$i++){$ss.="".$sko[$i]."";} $ss.=""; $tabl=$nach.$ss.$ser.$kon; return $tabl; } function tabl($stroka){ //формирует строку с таблицей if($stroka==''){$stroka="0100";} $p=substr($stroka,2,1); $n=substr($stroka,0,2); settype($n,"integer"); /* if ($p=='0') {$tabl=meciac($n);} else {$tabl=decadas($n);} */ $tabl=meciac($n); return $tabl; } function spektr ($s){ //раскрывающийся список ледовитость/ площадь льда global $otk; if($s==""){$s=0;}//если нет выбирается ледовитость $sel = ''; return $sel; } function statistiki($s){ //раскрывающийся список статистик global $stat_n, $static; if($s==""){$s=0;}//если нет выбранной статистики $sel = ''; $static=$s; return $sel; } function dec_mes ($s){//раскрывающийся список для мес или дек global $md, $m_d; if($s==""){$s=0;}//если нет выбранного дня выбирается первый $sel = ''; return $sel; } function marios ($s){ // раскрывающийся список морей global $mas2, $k_mar; if($s==""){$s="01";} // $sel = ''; return $sel; } function grafik($mr,$p){ global $mas1,$mas2,$mas3; settype($mr,"integer"); $nf=$mas3[$mr]; $n_mar=$mas2[$mr]; $tabl='
График временного хода
'; if ($p=='0') { $tabl.=""; $tabl.=""; $t=""; for($i=1;$i<=12;$i++){ $tabl.=""; $t.='';;} $tabl.="".$t."";} else{ $tabl.="
".$mas1[$i-1]."'; $t.='
"; $tabl.=""; $t="";$t_d=""; for($i=1;$i<=12;$i++){ $tabl .=""; for($j=1;$j<=3;$j++){ $t_d.=""; $t.='';}} $tabl.="".$t_d."".$t.""; } $tabl.="
".$mas1[$i-1]."".$j."'; $t.='
"; return $tabl; } file_ini(); //читает файл с морями и послед датой $ago_f=""; foreach ($_POST as $field => $value){$ago_f.=$value;} //чтение HTML-форм $html_mar = marios(substr($ago_f,0,2)); //раск.список морей //$html_diap = dec_mes(substr($ago_f,2,1)); //раск.список месяц или декада $html_stat = statistiki(substr($ago_f,2,1)); $html_spe = spektr(substr($ago_f,3,1)); $html_tabl = tabl($ago_f); // таблица с данными //$html_grafik=grafik(substr($ago_f,0,2),substr($ago_f,2,1)); ?>

      моря                                                                                                                                          статистика                индекс
       
"; echo $html_tabl; ?>