# Curiosidad matemática
puts "Una curiosidad matemática es que cualquier número positivo da como resto 1 aplicando"
puts "las siguientes condiciones"
puts "Si es par el número/2 y con su razón hasta la más pequeña"
puts "Si es impar, el (número*3+1)/2"
puts
puts "PROBEMOS"
puts
$n=0
def inicio
puts 'Pon un número superior a 0'
STDOUT.flush
$n=gets.chomp.to_i
case $n
when 0
puts 'No es lo que te pido'
puts 'Pon un número superior a 0'
STDOUT.flush
$n=gets.chomp.to_i
70.times do||
print "="
end
puts
puts '| Ya es la segunda vez, terminamos y vuelve a empezar si quieres |'
70.times do||
print "="
end
puts
puts
exit 0
end
end
inicio
if $n > 0
puts "Has escrito el número #{$n} "
end
50.times do||
print "="
end
def parimpar
if $n%2==0
puts
print "que el #{$n} es par "
$t=($n)/2
print "y la siguiente relación #{$n}/2 da #{$t}"
else
puts
print "que el #{$n} es impar "
$t=($n*3+1)/2
print "y la siguiente relación (#{($n)}*3+1)/2 da #{$t}"
end
end
parimpar
while $t > 1
$n = $t
parimpar
end
puts
50.times do||
print "="
end
puts
puts
puts "Esto es, esto es, esto es.... todooo"
puts
