<?php
class Valores
{
protected $valor1;
protected $valor2;
protected $resultado;
public function __construct($v1,$v2){
$this->valor1=$v1;
$this->valor2=$v2;
}
public function imprimir(){
return $this->resultado;
}
}
class Operar extends Valores
{
protected $title;
public function __construct($v1,$v2,$title)
{
parent::__construct($v1,$v2);
$this->title=$title;
}
public function Sumar(){
$this->resultado=$this->valor1+$this->valor2;
}
public function imprimir()
{
echo "<h3>".$this->title."</h3>";
echo "La suma de: ".$this->valor1." y ".$this->valor2. "es :";
echo parent::imprimir();
}
}
$obj=new Operar(5,1,'Sobreescritura de métodos');
$obj->Sumar();
$obj->imprimir();
?>
Descargar Archivo
http://www.mediafire.com/download/h6gija3cwrs3a9r/Herencia_entre_clases_-02.zip
viernes, 26 de diciembre de 2014
POO PHP - Métodos Estáticos
<?php
class String
{
public static function fecha()
{
return 'Fecha Actual: '.date('d/m/Y h:i:s');
}
public static function texto($text,$cant1,$cant2)
{
return substr($text, $cant1,$cant2);
}
}
echo String::fecha();
echo "<br/>";
$texto="Estos son métodos estaticos";
echo String::texto($texto,0,8);
Descargar Archivo http://www.mediafire.com/download/n0iwv50x0bwfbrs/M%C3%A9todos+Est%C3%A1ticos.zip
Descargar Archivo http://www.mediafire.com/download/n0iwv50x0bwfbrs/M%C3%A9todos+Est%C3%A1ticos.zip
POO PHP - Herencia entre clases
<?php
//Clase Padre
class Valores
{
protected $valor1;
protected $valor2;
protected $resultado;
public function cargarvalor1($v1)
{
$this->valor1=$v1;
}
public function cargarvalor2($v2)
{
$this->valor2=$v2;
}
public function imprimir()
{
return $this->resultado;
}
}
//Calse Hija: Son aquellas que heredan las propiedades y métodos de la clase padre
class Operar extends Valores
{
public function Sumar(){
$this->resultado=$this->valor1+$this->valor2;
return $this->resultado;
}
}
$obj=new Operar();
$obj->cargarvalor1(1);
$obj->cargarvalor2(5);
$obj->Sumar();
echo 'La suma es: '.$obj->imprimir();
?>
Descargar Archivo
http://www.mediafire.com/download/iri0y0fkaf8ztgr/Herencia_entre_clases_-01.zip
//Clase Padre
class Valores
{
protected $valor1;
protected $valor2;
protected $resultado;
public function cargarvalor1($v1)
{
$this->valor1=$v1;
}
public function cargarvalor2($v2)
{
$this->valor2=$v2;
}
public function imprimir()
{
return $this->resultado;
}
}
//Calse Hija: Son aquellas que heredan las propiedades y métodos de la clase padre
class Operar extends Valores
{
public function Sumar(){
$this->resultado=$this->valor1+$this->valor2;
return $this->resultado;
}
}
$obj=new Operar();
$obj->cargarvalor1(1);
$obj->cargarvalor2(5);
$obj->Sumar();
echo 'La suma es: '.$obj->imprimir();
?>
Descargar Archivo
http://www.mediafire.com/download/iri0y0fkaf8ztgr/Herencia_entre_clases_-01.zip
martes, 26 de agosto de 2014
Algoritmos - Estructura For
Ejercicio N° 01
Module Module5
'Desarrollar un algoritmo para imprimir una serie de números. Los cuales deben cumplir con lo siguiente:
' · los números tienen que ser mayores a 8 y menores de 30.
' · no se deben imprimir los números 14 y 16.
Sub main()
Dim i As Integer
For i = 9 To 30
If i <> 16 And i <> 14 Then
Console.WriteLine(i)
End If
Next
Console.ReadKey()
End Sub
End Module
Ejercicio N° 02
Module Module6
'Realizar un programa que le permita introducir por teclado 5 números enteros, de los cuales se
'requiere que el programa muestre cuel de ellos es el número mayor así como tambien el número menor.
Sub Main()
Dim numero, mayor, menor As Integer
Console.Write("Número: ")
mayor = Console.ReadLine
menor = mayor
For i As Integer = 1 To 5
Console.Write("Número: ")
numero = Console.ReadLine
If (numero > mayor) Then
mayor = numero
ElseIf (numero < menor) Then
menor = numero
End If
Next
Console.WriteLine("El número mayor es: " & mayor)
Console.WriteLine("El número menor es: " & menor)
Console.ReadKey()
End Sub
End Module
Ejercicio N° 03
Module Module7
Sub main()
Dim aux As Integer
Dim n As Integer
Dim matriz(n) As Integer
Console.Write("Ingresa Limite Del Vector: ")
n = Console.ReadLine()
n -= 1
For i = 0 To n Step 1
Console.Write("Ingresa elemento " & i + 1 & " : ")
matriz(i) = Console.ReadLine()
Next
Console.WriteLine()
Console.WriteLine("Vector Original")
Console.WriteLine()
For i = 0 To n Step 1
Console.Write("[" & matriz(i) & "] ")
Next
For i = 0 To n Step 1
For j = 0 To n - 1 Step 1
If matriz(j) > matriz(i) Then
aux = matriz(j)
matriz(j) = matriz(i)
matriz(i) = aux
End If
Next
Next
Console.WriteLine()
Console.WriteLine("Vector Ordenado")
Console.WriteLine()
For i = 0 To n Step 1
Console.Write("[" & matriz(i) & "] ")
Next
Console.ReadKey()
End Sub
End Module
Algoritmos - Estructura condicional simple
Ejercicio N° 02
Module Module2
'Dado dos números enteros A y B imprimir la suma siempre y cuando ambos sean positivos.
Sub main()
Console.Title = "Estructura Condicional"
Dim A, B As Integer
Dim suma As Double = 0
Console.WriteLine("Ingrese número A: ")
A = Console.ReadLine
Console.WriteLine("Ingrese número B: ")
B = Console.ReadLine
If (A > 0 And B > 0) Then
suma = A + B
Console.WriteLine("La suma es: " & suma)
End If
Console.ReadKey()
End Sub
End Module
Ejercicio N° 03
Module Module3
'Imprimir la suma de A y B siempre y cuando por lo menos uno de los dos sea positivo.
Sub main()
Console.Title = "Estructura Condicional"
Dim A, B As Integer
Dim suma As Double = 0
Console.WriteLine("Ingrese número A: ")
A = Console.ReadLine
Console.WriteLine("Ingrese número B: ")
B = Console.ReadLine
If (A > 0 or B > 0) Then
suma = A + B
Console.WriteLine("La suma es: " & suma)
End If
Console.ReadKey()
End Sub
End Module
Ejercicio N° 04
Module Module4
'Dado un número imprimir si este es par o impar.
Sub main()
Console.Title = "Verificar Números"
Dim Num As Integer
Console.WriteLine("Ingrese un número: ")
Num = Console.Read
If (Num Mod 2 = 0) Then
Console.WriteLine("El número digitado es par")
Else
Console.WriteLine("El número digitado es impar")
End If
Console.ReadKey()
End Sub
End Module
Algoritmos - Estructura Condicinal
Ejercicio N° 01
Module Module1
'Realizar la suma de dos números,Mostar la suma y determinar si el resultado es positivo, negativo o cero.
Sub Main()
Console.Title = "Sumar Números"
Dim Num1, Num2, Res As Double
Console.Write("Ingrese primer número: ")
Num1 = Console.ReadLine
Console.Write("Ingrese segundo número: ")
Num2 = Console.ReadLine
Res = Num1 + Num2
Console.WriteLine()
Console.WriteLine("********************************************************")
Console.WriteLine()
Console.ForegroundColor = ConsoleColor.Cyan
If (Res >= 1) Then
Console.WriteLine("La suma es: " & Res)
Console.WriteLine("El resultado es positivo")
ElseIf (Res <= -1) Then
Console.WriteLine("El resultado es negativo")
Else
Console.WriteLine("El resultado es cero")
End If
Console.ReadKey()
End Sub
End Module
Suscribirse a:
Entradas (Atom)