clc();

x = 50
y = 1
z = 0
disp("se inicia el while")
while x ~= y
  z = z + y*x
  x = x - 1
  y = y + 1
endwhile