'.$id.' あなたの解答一覧データ
';
$fp = "q_data.txt";//ファイル名
$fl = fopen($fp,"r");//データの呼び出し
$lc=0;//行数カウンタ
while(!(feof($fl))){
$line = fgets($fl,1024);//1行取り出し
$line = chop($line);//末尾のスペース除去
$data=explode(",",$line);//配列に格納
$t_data[$lc][0]=$data[0];//漢字
$t_data[$lc][1]=$data[1];//仮名
$t_data[$lc][2]=$data[2];//頭文字
$lc=$lc+1;
}
fclose($fl);
for($i=1;$i<$lc;$i++){
print ''.$i.' ';
}
print '
';
print "問題".$num."：
".$t_data[$num][0]."
";
?>
○正解
';
print "あなたの解答：".$ans;
}else{
$list_tf="不正解";
$list_ans=$ans;
print '×不正解
';
print "あなたの解答：";
$su=mb_strlen($ans)/2;
for($i=0;$i<$su+1;$i++){
$a[$i] = substr($ans,$i*2,2);
$t[$i] = substr($t_data[$num][1],$i*2,2);
if($a[$i]==$t[$i]){
print $a[$i];
}else{
print ''.$a[$i].'';
}
}
}
print "
正解：".$t_data[$num][1];
$next=$num+1;
?>
次の問題