Cita de: CuriosO en 16 Febrero 2011, 03:12 AMLa unica forma de subir archivos al servidor es por esta web que esta incluida dentro de mi sitio principal?????
Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes MenúCita de: CuriosO en 16 Febrero 2011, 03:12 AMLa unica forma de subir archivos al servidor es por esta web que esta incluida dentro de mi sitio principal?????
<?php
foreach($productos as $key => $value){
if($productos[$key]['padre'] == 0){
recursividad($key, $productos );
}
}
?>
#!/usr/bin/perl
print "CALCURADORA\n\n";
print "Teclea el numero de la accion que desees realizar:\n";
print "0 - Salir\n";
print "1 - Sumar\n";
print "2 - Restar\n";
print "3 - Multiplicar\n";
print "4 - Dividir\n";
$sAccion = <STDIN>;
print &sAcciones($sAccion)."\n";
# Functión para pedir números.
sub sPedirNumeros{
$sCount = shift; # @Parametro 1, contador de números.
print "Ingrese número " . $sCount . ": ";
$sNumero = <STDIN>;
return $sNumero;
}
# Functión para las acciones de la calculadora.
sub sAcciones{
$sAccion = shift; # @Parametro 2, acción a realizar.
$sNum = 0;
if( $sAccion == "0" ){
return 0;
}else{
print "Cuantos números?\n";
$sCantNum = <STDIN>;
if( $sAccion == "1" ){
for($i=0; $i<$sCantNum; $i++){
$sNum = $sNum + &sPedirNumeros($i + 1);
}
return $sNum;
}elsif( $sAccion == "2" ){
for($i=0; $i<$sCantNum; $i++){
$sNum = $sNum - &sPedirNumeros($i + 1);
}
return $sNum;
}elsif( $sAccion == "3" ){
for($i=0; $i<$sCantNum; $i++){
$sNum = $sNum * &sPedirNumeros($i + 1);
}
return $sNum;
}elsif( $sAccion == "4" ){
for($i=0; $i<$sCantNum; $i++){
$sNum = $sNum / &sPedirNumeros($i + 1);
}
return $sNum;
}
}
}
$sFOpen = fopen($sFile, rw);
$sCount = fgets($sFOpen, 5);
$sCount += 1;