rendered paste body<?
function tukor($sz)
{
$sz = "".$sz;
$ujsz="";
for($i=strlen($sz)-1;$i>=0;$i--)
{
$ujsz = $ujsz.$sz[$i];
}
if($sz==$ujsz) return 1; else return 0;
}
function prim($sz)
{
$oszto=2;
$van=0;
while(($oszto<$sz)&&($van==0))
{
if($sz % $oszto == 0) $van=1;
$oszto++;
}
if(($van==0)&&($sz>1)) return 1; else return 0;
}
//Megirtam de nem hasznaltam
function fibo($sz)
{
$f1=1;
$f2=1;
while($f2<$sz)
{
$f=$f1+$f2;
$f1=$f2;
$f2=$f;
}
if($sz==$f2) return 1; else return 0;
}
//Generate the first 50 and write into a table
echo '<table border="1">';
echo "<tr>";
echo "<td>Index</td>";
echo "<td>Primszám</td>";
echo "<td>Fibonacci szám</td>";
echo "<td>Tükörszám</td>";
//Core
$n=50; //Hany szam?
$i=0; //kiirt szamok;
$j=0; //a szam
$tukorVektor=array();
while($i<=$n)
{
if(tukor($j))
{
$i++;
$tukorVektor[$i]=$j;
$j++;
} else $j++;
}
$i=0; //kiirt szamok;
$j=0; //a szam
$primVektor==array();
while($i<=$n)
{
if(prim($j))
{
$i++;
$primVektor[$i]=$j;
$j++;
} else $j++;
}
$fiboVektor=array();
$i=1;
$fiboVektor[0]=1;
$fiboVektor[1]=1;
while($i<$n)
{
$fiboVektor[$i+1]=$fiboVektor[$i]+$fiboVektor[$i-1];
$i++;
}
for($i=1;$i<=$n;$i++)
{
echo "<tr><td>$i</td><td>$primVektor[$i]</td> <td>$fiboVektor[$i]</td><td>$tukorVektor[$i]</td></tr>";
}
echo "</table>";
?>