Code-source


00001     <?php     

00002     include("std.php") ;     

00003     debutPage("chat","strict") ;     

00004     debutSection() ;     

00005     ######################################################     

00006          

00007     h1("Traduction presque mot à mot") ;     

00008          

00009     ?>     

00010          

00011     <h2> A éviter</h2>     

00012     <table class="collapse" border="1" cellpadding="10" >     

00013       <tr>     

00014          <th>Français</th>     

00015          <td align="center"><b>English</b></td>     

00016       </tr>     

00017       <tr>     

00018         <td>le</td>     

00019         <td>the</td>     

00020       </tr>     

00021       <tr>     

00022         <td>chat</td>     

00023         <td>cat</td>     

00024       </tr>     

00025       <tr>     

00026         <td>mange</td>     

00027         <td>eats</td>     

00028       </tr>     

00029     </table>     

00030          

00031          

00032     <?php     

00033          

00034     h2("Super 1 !") ;     

00035          

00036     p() ;     

00037     $m ="chat" ;     

00038     echo " il y a ".strlen($m)." lettres dans le mot '$m'" ;     

00039     finp() ;     

00040          

00041     p() ;     

00042     $m = "chat" ;     

00043     $n = strlen($m) ;     

00044     echo "(sans doute mieux) il y a $n lettres dans le mot '$m'" ;     

00045     finp() ;     

00046          

00047          

00048     $fr = "le chat mange la souris__grise dans le jardin"  ;     

00049     $en = "the cat eats the grey__mouse in the garden"  ;     

00050          

00051     $nbm = nbmots($fr) ;     

00052     table(1,10,"collapse tarose") ;     

00053     entetesTableau("phrase__Française phrase__Anglaise","bleu_pastel") ;     

00054     for ($idm=1;$idm<=$nbm;$idm++) {     

00055      tr() ;     

00056         td("L","tajaunec") ; echo preg_replace("/__/"," ",mot($fr,$idm)) ; fintd() ;     

00057         td() ;     

00058            #echo mot($en,$idm) ;     

00059            echo preg_replace("/__/"," ",strtoupper(mot($en,$idm))) ;     

00060         fintd() ;     

00061     fintr() ;     

00062     } ; # fin pour idm     

00063     fintable() ;     

00064          

00065     h2("Super 2 !") ;     

00066          

00067     $nbm = nbmots($fr) ;     

00068     table(1,10,"collapse tarose") ;     

00069     tr() ;     

00070     th("C","tajaunec") ; echo "Français" ; finth() ;     

00071     for ($idm=1;$idm<=$nbm;$idm++) {     

00072         td("L","tajaunec") ;     

00073            echo mot($fr,$idm) ;     

00074         fintd() ;     

00075     } ; # fin pour idm     

00076     fintr() ;     

00077          

00078     tr() ;     

00079     th() ; echo "Anglais" ; finth() ;     

00080     for ($idm=1;$idm<=$nbm;$idm++) {     

00081         td() ; echo mot($en,$idm) ; fintd() ;     

00082     } ; # fin pour idm     

00083     fintr() ;     

00084     fintable() ;     

00085          

00086     h2("Quelques exemples de boucles avec des nombres ") ;     

00087          

00088     p() ;     

00089     for ($n=1;$n<=10;$n++) {     

00090       echo "$n " ;     

00091     } ; # fin pour     

00092     finp() ;     

00093          

00094      $n = 1 ;     

00095          

00096      while ($n*$n<800) {     

00097        $n++ ;     

00098        if ($n<5) {     

00099          p() ;     

00100           echo " n = $n carré ".$n*$n ;     

00101          finp() ;     

00102        } else {     

00103          if ($n==5) { p() ; echo "..." ; finp() ; } ;     

00104        } ; # fin si     

00105      } ; # fin tant que     

00106          

00107     p() ;     

00108      $rep = $n - 1 ;     

00109      echo" $rep est le plus grand nombre dont le carré est &lt; à 800 " ;     

00110     finp() ;     

00111          

00112     p() ;     

00113      $n = 1 ;     

00114      while ($n*$n*$n<800) {     

00115        $n++ ;     

00116      } ; # fin tant que     

00117      $rep = $n - 1 ;     

00118      echo" $rep est le plus grand nombre dont le cube est &lt; à 800 " ;     

00119     finp() ;     

00120          

00121     h2("Quelques exemples de boucles avec des mots ") ;     

00122          

00123     $ldc = "oeuf pain lait vin beurre fromage" ;     

00124     $nbm = nbmots($ldc) ;     

00125          

00126     function lpg($ch) {     

00127       $url = "https://www.google.fr/search?q=$ch" ;     

00128       echo href($url,$ch) ;     

00129     } # fin de fonction     

00130          

00131     h2(" de façon simple") ;     

00132     for ($idm=1;$idm<=$nbm;$idm++) {     

00133      p() ;     

00134       $jdm = $nbm + 1 - $idm ;     

00135       $m   = mot($ldc,$jdm) ;     

00136       $url = "https://www.google.fr/search?q=".mot($ldc,$jdm) ;     

00137       echo href($url,$m) ;     

00138      finp() ;     

00139     }# fin pour idm     

00140          

00141     h2(" un peu mieux") ;     

00142     for ($idm=1;$idm<=$nbm;$idm++) {     

00143      p() ;     

00144       $jdm = $nbm + 1 - $idm ;     

00145       $m   = mot($ldc,$jdm) ;     

00146       $url = "https://www.google.fr/search?q=$m" ;     

00147       echo href($url,$m) ;     

00148      finp() ;     

00149     }# fin pour idm     

00150          

00151     h2(" avec la fonction lpg") ;     

00152     for ($idm=1;$idm<=$nbm;$idm++) {     

00153      p() ;     

00154       $jdm = $nbm + 1 - $idm ;     

00155       $m   = mot($ldc,$jdm) ;     

00156       lpg($m) ;     

00157      finp() ;     

00158     }# fin pour idm     

00159          

00160          

00161     p() ;     

00162     echo href("montresource.php?nomfic=chat.php","Code-source php de cette page","orange_stim nou")."." ;     

00163     finp() ;     

00164          

00165     ######################################################     

00166     finSection() ;     

00167     finPage() ;     

00168     ?>
Listing du fichier chat.php
