Algoritmo detarea
	Definir x,c,vectorA,vectorB,vectorC Como Entero	
	Dimension vectorA[10],vectorB[10],vectorC[10]
	para x = 1 Hasta 10 Con Paso 1 Hacer
		Escribir "Ingresa un numero Vector A"
		leer vectorA(x)
	FinPara
	
	para x = 1 Hasta 10 Con Paso 1 Hacer
		Escribir "Ingresa un numero Vector B"
		leer vectorB(x)
	FinPara
	para x = 1 Hasta 10 Con Paso 1 Hacer
		vectorC(x) = vectorA(x) * vectorB(x)
	FinPara
	c= 0
	para x = 1 Hasta 10 Con Paso 1 Hacer
		Escribir "Vector C: ",vectorC(x)
		si vectorC(x) > 30 Entonces
			c = c + 1
		FinSi
	FinPara
	Escribir c," numeros sobrepasan el valor de 30"	
FinAlgoritmo