<html>
<head>
<title>Ej 133</title>
</head>
<body bgcolor=silver>
<form name="formulario1" action="" method="post">
<center><b>Ej 133<br></center>
<center><b>Introduzca la longitud del vector</center>
<center><input type="text" name="n" size="15"></center><br>
<center><input type="submit" name"boton1" value="enviar"></center>
</form>
<?php
if ($_POST){
$n=$_POST["n"];
if ($n > 100 )
{
echo "no se permiten valores superiores a 100" )
}
else
{
for ($i=0; $i<$n; $i++)
{
$vectorx[$i]=rand(1,100);
$vectory[$i]=rand(1,100);
$acux=$acux+$vectorx[$i];
$acuy=$acuy+$vectory[$i];
}
$mediax=$acux/$n;
$mediay=$acuy/$n;
echo "<center>La media de x es $mediax<br>";
echo "<center>La media de y es $mediay<br>";
for ($i=0; $i<$n; $i++)
{
$acuxy=$acuxy+($vectorx[$i]*$vectory[$i]);
$acu2x=$acu2x+($vectorx[$i]*$vectorx[$i]);
}
$cofa=(($acuxy)-$n*$mediax*$mediay)/(($acu2x)-$n*$mediax*$mediax);
$cofb=$mediay-$cofa*$mediax;
echo "<center>El coeficiente a es $cofa<br>";
echo "<center>El coeficiente b es $cofb<br>";
}
}
?>
</body>
</html>
viernes, 29 de enero de 2010
Ej 133 Calcular la media y coeficientes de dos vectores
Suscribirse a:
Enviar comentarios (Atom)
No hay comentarios:
Publicar un comentario
Nota: solo los miembros de este blog pueden publicar comentarios.