Proceso multiplos
	Escribir "Los multiplos del 7"
	Leer s
	x<-1
	a<-7
	Mientras x<=s Hacer
		r<-x*a
		Escribir a*x
		x<-x+1
	FinMientras
FinProceso