|
Alojado en:
urbe-networks.com
Recomienda
esta pagina a un amigo
Servicios
Gratuitos
Articulos relacionados
Utilizar GetRows()
Tienda Virtual - Carrito de compra
Messenger a través de BD en ASP
Miniaplicacion de comercio electronico
Objeto Datagrid de ASP.NET en ASP
Acotación de resultados
Sugerencias Microsoft sobre ASP (I)
Conservar los saltos de linea
Descarga del tutorial de ASP
Un sistema de recomendación
¿De que pagina vienen mis visitas?
Un Chat en ASP
Un sistema de encuestas
Adaptación de la hora de un servidor extranjero
Formato de fechas en SQL Server
Tutorial de ASPEmail (Ampliado)
Enlaces
recomendados
|
|
Tutorial ASP
Ejemplo de Calculo de numeros primos
Este articulo ha sido leído 38,057
veces
|
|
Calculo de números primos
Este pequeño ejemplo nos permite saber si un numero introducido por pantalla es o no
primo.
Consta de 2 páginas:
- Primos.html página html normal que contiene
un formulario para introducir el numero a evaluar.
- Primos.asp página asp que
recibe el numero introducido y devuelve al usuario una página en la que dice si el numero
es primo o no.
| Primos.html |
<html>
<head>
<title>Calculo de numeros primos</title>
</head>
<body>
<h2 align="center">Calculo de numeros primos</h2>
<center>
<table border="1" width="30%">
<tr>
<td width="100%"><p
align="center">Introduce un numero</p>
<form method="POST" action="primos.asp">
<p><input type="text"
name="numero" size="20"></p>
<center><p><input type="submit"
value="Enviar" name="B1">
<input type="reset"
value="Restablecer" name="B2"></p>
</center>
</form>
</td>
</tr>
</table>
</center>
</body>
</html> |
| Primos.asp |
<%option
explicit%>
<html>
<% dim numero,contador,primo,result,doble
numero=request.form("numero")%>
<head>
<title>Calculo de numeros primos</title>
</head>
<body>
<hr>
<%if isnumeric(numero) then
doble = cdbl(numero)
numero=clng(numero)
if numero <> doble or numero > 30000000 then %>
<p align="center">
el numero no puede tener decimales ni ser mayor de 30000000
<%else
contador = 2
primo=true
do while contador < numero-1 and primo = true
if numero mod contador = 0 then
primo=false
else
contador=contador+1
end if
loop
if primo then
response.write "el numero "&numero
&" es primo"
else
response.write "el numero "& numero&
" no es primo, es divisible por " &contador
end if
end if
else%>
El campo de consulta debe ser numerico
<%end if%>
</p>
<hr align="center">
<p align="center"><a href="primos.html">Otra
vez</a></p>
</body>
</html>
|
37 usuarios han valorado este
articulo.
Valoracion media:
|
Nota: Para
cualquier consulta u opinión sobre este articulo puedes usar los
foros
AspTutor lo
hacemos entre todos ¿Como vas a colaborar hoy?
|
Demo
