[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

[Speedy]

a raczej o porady jak można by łatwiej lub lepiej zapisać owe funkcję.

[PHP] pobierz, plaintext 
<?php
for($i=0;$i
   {
?>
[PHP] pobierz, plaintext 

tu masz coś niedokończone

[PHP] pobierz, plaintext 
<?php
if($a>=$b)
   {
     $A=$a;
     $B=$b;      
   }
   
   if($a<$b)
   {
     $A=$b;
     $B=$a;
   }
?>
[PHP] pobierz, plaintext 

1. po co generować kolejną instrukcję warunkową? Przecież wiadomo, że w tym przypadku, jak jedna nie zadziała, to uruchomi się druga - wystarczy dać else.
2. Nie podoba mi się zwyczaj tworzenia różnych zmiennych, które różnią się tylko wielkością liter. Na dłuższą metę może to doprowadzić do niezłego bałaganu.

Ten post edytował Speedy 18.10.2008, 21:59:15