VB toma los valores máximo y mínimo
dim V(N),max_temp,max
private sub a()
para i=0 a N
si V(i)>max_temp entonces max_temp=V(i)
next
max=max_ temp
end sub
El procedimiento específico debe cambiarse, V (N) debe estar bien definido, es decir, el número de N. Comparar en un bucle. Si se encuentra una variable mayor que la variable temporal, asigne esta variable a la variable temporal. El resultado final es el valor máximo. p>