El Algoritmo con vectores en scilab
Enviado por elsanto01 • 18 de Septiembre de 2015 • Tarea • 507 Palabras (3 Páginas) • 252 Visitas
//Dado un Vector halle el promedio de sus elemntos positivos pares, ademas indique cuantos y cuales valores cumplieron esta condición, al igual que sus posiciones
clc
x=input("ingrese tamaño del vector ")
printf("Ingrese los valores")
for w=1:x
M(w)=input("-->")
end
c1=0,s1=0
for e=1:x
if M(e)>0 & modulo(M(e),2)==0 then
c1=c1+1
s1=s1+M(e)
V(c1)=M(e)
V2(c1)=e
end
end
if c1>0 then
prom=s1/c1
printf("%.3f es el promedio de los elementos pares positivos en el vector \n",prom)
printf("%d es la cantidad de los pares positivos del vector, los valore son, en estas posiciones: \n",c1)
for p=1:c1
printf("[%d-->%d] \n",V2(p),V(p))
end
end
clear
//Dado un Vector indique que hay más, si valores pares o valores impares, ademas
//Si posee mas pares, calcule el promedio de los cunos de los siguientes ordinales de estos valores
//Si posee mas impares, calcule el promedio de las raices cuadradas de los suguientes ordinales de estos valores
clc
x=input("ingrese tamaño del vector ")
for r=1:x
M(r)=input(":")
end
c1=0,sn=0,c2=0,cn=0
for c=1:x
if modulo(M(c),2)==0 then
c1=c1+1
V(c1)=M(c)
V1(c)=c
t=(M(c)+1)**3
sn=sn+t
end
if modulo(M(c),2)==1 then
c2=c2+1
Y(c2)=M(c)
Z(c2)=c
t1=(M(c)+1)**(1/2)
cn=cn+t1
end
end
if c1>c2 & c1>0 then
prom=sn/c1
printf("como hay mas valores pares %f es el promedio de los cubos de los siguientes ordinales de los valores del vector que son pares \n",prom)
for d=1:c1
printf("[%d--%d]\n",V(d),V1(d))
end
end
if c2>c1 & c2>0 then
prom2=cn/c2
printf(" como hay mas valores impares %f es el promedio de las raices cuadradas de los siguientes ordinales de los valores del vector que son impares\n",prom2)
for f=1:c2
printf("[%d--%d]\n",Y(f),Z(f))
end
end
clear
//Dado un vector y un valor previamente leído, indique si dicho valor se encuetra o no en el vector, si se encuentra, indique cuantas veces y en que posiciones//
clc
num=input("ingrese un numero ")
x=input("ingrese tamaño del vector ")
...