Arreglo que da números negativos

Cristian Santana

Algoritmo sin_titulo
Dimension arreglo[10]
Para i<-1 hasta 10 Con Paso 1 Hacer
  Leer num
  arreglo[i]<-num
FinPara
Para i<-1 hasta 10 Con Paso 1 Hacer
  Escribir arreglo[i]
FinPara
Borrar Pantalla
Para i<-1 Hasta 10 Con Paso 1 Hacer
  si arreglo[i]<0 Entonces
   Escribir arreglo[i]
  SiNo
   Escribir "No son negativos"
  FinSi
FinPara
FinAlgoritmo