[Skrypty]Matematyka Opcje

[ShadowD]

Mam skrypty napisane przeze mnie i chciał bym was prosić o ocenę, a tak naprawdę o wytknięcie błędów. Zmienne są brzydko ponazywane ale to wersja, że tak powiem robocza. Skrypty poruszają bajeczne problemy...

Nie będę pisał dużo niech skrypty mówią same za siebie. ;p

[ANR] Zamiana znaków arabskich na rzymskie:

[PHP] pobierz, plaintext 
<?php
function anr($a)
  {
        
    $znakiArabskie=array(1,4,5,9,10,40,50,90,100,400,500,900,1000);
    $znakiRzymskie=array('I','IV','V','IX','X','XL','L','XC','C','CD','D','CM','M');
    
    for($i=12;$i>=0;$i--)
    {    
      while($a>=$znakiArabskie[$i])
      {
        $a=$a-$znakiArabskie[$i];
        $anr=$anr.$znakiRzymskie[$i];
      }
    }
    
    return $anr;    
  }
 
?>
[PHP] pobierz, plaintext 

[RNA] Zamiana znaków rzymskich na arabskie:

[PHP] pobierz, plaintext 
<?php
function rna($a)
  {
 
    $znakiRzymskie=array('I','V','X','L','C','D','M');
    $znakiArabskie=array(1,5,10,50,100,500,1000);
 
    for($i=strlen($a)-1;$i>=0;$i--)
    {
      for($j=6;$j>=0;$j--)
      {
        if($a[$i]===$znakiRzymskie[$j])
          $b[$i]=$znakiArabskie[$j];
      }
    }
 
    for($i=0;$i
    {
      $n=$i+1;
 
      if(isset($b[$n]))
      {
        if($b[$i]>=$b[$n])
          $rna=$rna+$b[$i];
         else
          $rna=$rna-$b[$i];
      }
      else
        $rna=$rna+$b[$i];
    }
  
  return $rna;  
  }
 
?>
[PHP] pobierz, plaintext 

[NWD] Największy wspólny dzielnik:

[PHP] pobierz, plaintext 
<?php
function NWD($a,$b)
  {
    
    if($a>=$b)
    {
      $A=$a;
      $B=$b;      
    }
    else
    {
      $A=$b;
      $B=$a;
    }
        
    do
    { 
      $R=$A%$B;
     
      $A=$B;
      $B=$R;
    }
    while($R!=0);
    
    return $A;
  }
 
?>
[PHP] pobierz, plaintext 

[NWW] najmniejsza wspólna wielokrotność:

[PHP] pobierz, plaintext 
<?php
function zna($a,$b)
  {
    $nwd=nwd($a,$b);
 
    $i=$a*$b;
 
    $nww=$i/$nwd;
    
    return $nww;
  }
 
?>
[PHP] pobierz, plaintext 

Niektóre funkcje korzystają z poprzednich więc powiedzmy, że wszystkie są w jednym pliku.

@Administracja/Opiekunowie - Jeśli istnieje lepsze miejsce na poruszenie owego tematu chciał bym prosić o przeniesienie go w to miejsce. Z góry dziękuję.

Ten post edytował ShadowD 19.10.2008, 12:17:16

[ShadowD]

Kod poprawiłem brakowało kawałka linii, nie wiem dlaczego się nie skopiował...

1. Faktycznie można zastosować else. <<-- Poprawione
2. Co do nazw zmiennych są takie ponieważ korzystałem przy tworzeniu algorytmów z książki do matematyki i tak tam było to ponazywane, dla ułatwienia zrozumienia kodu dla nauczycieli zastosowałem podobne nazwy. Gdy tylko stworze stronę na której będą prezentowane te skrypty poprawię nazewnictwo.
3. Prace nad połączeniem funkcji zostały rozpoczęte. (IMG:http://forum.php.pl/style_emoticons/default/winksmiley.jpg)

Dziękuję za opinie...

Ten post edytował ShadowD 19.10.2008, 12:21:22