"; exit; endif; //Oreze radky o netisknutelne znaky pro ukonceni radku. $Radky = array(); for ($i=0; $i""): if (!EReg("^d\([0-9]{1,2},[0-9a-zA-Z_ ]{1}\)=\([0-9]{1,2},[0-9a-zA-Z_ ]{1},[LRS ]{1}\)$",$Radky[$i])): Header ("Content-Type: text/html"); echo "Pravidlo ".$Radky[$i]." neni v souboru zadano korektne!
"; exit; endif; list($LCastZ[],$PCastZ[])=explode(")=(",$Radky[$i]); endif; endfor; //Upravi levou stranu pravidla na pozadovany tvar. $LCast = array(); for ($i=0; $i"; endfor; for ($i=0; $i"; endfor; for ($i=0; $i"; endfor; */ //Pole LevaCast je prevedeno na dvojrozmerne pole LevaCast2D. $j1=0; $k1=0; $LevaCast2D=array(array()); for ($i=0; $i19): Header ("Content-Type: text/html"); echo "Pocet pravidel v souboru presahuje moznosti formulare!
"; exit; endif; */ endif; Header ("Content-Type: text/html"); ?> Formular pro zadavani pravidel TS

Turinguv stroj 2 Wangovo dlazdeni

Zapnout ceskou diakritiku.
Startovaci slovo:

Pravidla Turingova stroje:
  δ ()"; echo "="; echo "()  "; else: ?> () = ()  
"; else: ?>

Nacteni pravidel ze souboru: