Ruby/Практикум/Итераторы
Итераторы
[править]Дан целочисленный массив. Найти количество чётных элементов.
[править]Возможное решение:
a = [1, 2, 3, 4, 5, 6, 7, 8]
p a.select{ |i| i.even? }.size
Замечания по решению:
Возможное решение:
a = [1, 2, 3, 4, 5, 6, 7, 8]
p a.select{ |i| i%2 == 0 }.size
Замечания по решению:
Возможное решение:
a = [1, 2, 3, 4, 5, 6, 7, 8]
p a.select{ |i| i[0].zero? }.size
Замечания по решению:
Возможное решение:
a = [1, 2, 3, 4, 5, 6, 7, 8]
p a.find_all{ |i| i%2 == 0 }.size
Замечания по решению:
Возможное решение:
a = [1, 2, 3, 4, 5, 6, 7, 8]
p a.inject(0){ |sum, i| (i%2 == 0) ? (sum+1) : sum }
Замечания по решению:
Возможное решение:
a = [1, 2, 3, 4, 5, 6, 7, 8]
p a.count{ |i| i.even? }
Замечания по решению: Ruby 1.9.1
Возможное решение:
a = [1, 2, 3, 4, 5, 6, 7, 8]
p a.delete_if{ |i| i.odd? }.size
Замечания по решению:
Дано натуральное число. Необходимо проверить, является ли оно совершенным.
[править]Возможное решение:
m = 20
a = Array.new(m-1){ |i| i+1 }
b = a.select{ |x| m % x == 0 }
p( b.inject(0){ |result,elem| result+elem } == m )
Замечания по решению:
Возможное решение:
n=8128
n1=0
(1...n).each{|d| n1+=d if n%d==0}
p n==n1
Замечания по решению:
Возможное решение:
def is_perfect(num)
((1...num).to_a.select {|n| num%n == 0}).reduce(:+) == num
end
Замечания по решению:
Дан целочисленный массив. Найти количество его локальных максимумов.
[править]Возможное решение:
m = [1,2,3,2,3,4,2,4,6,7]
p( (1..m.size-2).to_a.select{ |i| (m[i] > m[i-1])&&(m[i] > m[i+1]) }.size )
Замечания по решению:
Возможное решение:
maccuB = [4, 8, 6, 5, 1, 2, 3, 5, 4, 8, 9, 6]
p (1...maccuB.size-1).select{ |x| (maccuB[x] > maccuB[x-1])&&(maccuB[x] > maccuB[x+1]) }.size
Замечания по решению:
Возможное решение:
require 'enumerator'
m = [1,2,3,2,3,4,2,4,6,7]
cnt=0
m.each_cons(3){|a,b,c| cnt+=1 if a<b and b>c}
p cnt
Замечания по решению:
Дан целочисленный массив. Проверить, чередуются ли в нем положительные и отрицательные числа.
[править]Возможное решение:
m = [5, -12, 5, -12, 9, -25]
p (1...m.size-1).all?{ |i| ((m[i-1] < 0) && (m[i+1] < 0)) || ((m[i-1] > 0) && (m[i+1] > 0)) }
Замечания по решению: тут ошибка - не работает для полностью положительного или полностью отрицательного массива. Не хватает проверки текущего значения:
((m[i] > 0) && (m[i-1] < 0) && (m[i+1] < 0)) || ((m[i] < 0) && (m[i-1] > 0) && (m[i+1] > 0))
Возможное решение:
maccuB = [1, -2, 5, -4]
p (0..maccuB.size-2).all?{ |x| (maccuB[x] * maccuB[x+1]) < 0 }
Замечания по решению:
Возможное решение:
array = [1,-2,3,-4]
(0..array.size - 1).all? { |i| (array[0] < 0) ? (i.even? ? array[i] < 0 : array[i] >= 0 ) : (i.even? ? array[i] >= 0 : array[i] < 0) }
Дан целочисленный массив и отрезок a..b. Необходимо найти элементы, значение которых принадлежит этому отрезку.
[править]Возможное решение:
m = [1, 2, 3, 4, 5]
ab = (3..5)
p m&ab.to_a
Замечания по решению:
Возможное решение:
m = [1, 2, 3, 4, 5]
ab = (3..5)
p m.select{ |i| ab.include?( i ) }
Замечания по решению:
Возможное решение:
m = [1, 2, 3, 4, 5]
a = 1
b = 20
p m.select{ |x| x>=a && x<=b }
Замечания по решению:
Возможное решение:
m = [1, 2, 3, 4, 5]
a,b = 2,5
p ( m - (m - ((a..b).to_a)) )
Замечания по решению:
Дано число А и натуральное число N. Найти результат следующего выражения 1 + А + А*2 - А*3 + … + ((-1)**N)*А*N.
[править]Возможное решение:
A,N = 5,7
diapazon = 4..N
p diapazon.inject(1 + A + A*2 - A*3){ |sum,i| sum + (-1**i)*A*i }
Замечания по решению: в данном решение допущена серьёзная ошибка. Приоритет у операции ** (возведение в степень) выше чем у операции -. поэтому сначала 1**i, а затем результат берётся с другим знаком. фрагмент кода следует заменить на { |sum,i| sum + ((-1)**i)*A*i }
Ошибка была допущена еще в задании - не хватало тех же скобок, поправил. Кроме того, похоже что перед А должен стоять "-" чтобы последовательность сохранялась, ну да ладно - покупатель всегда прав.
Дано вещественное число R и массив вещественных чисел. Найти элемент массива, который наиболее близок к данному числу.
[править]Возможное решение:
R,macc = 13.0, [3.1, 7.2, 10.3, 15.5]
macc = macc.sort
b = macc.select{ |i| i<R }
c = macc.select{ |i| i>R }
d = b.max
e = c.min
if (R-d) > (e-R)
puts e
else
puts d
end
Замечания по решению:
Возможное решение:
a, R = [1.2,2.5,3.1,4.3,2.1,3.6,5.7], 4.0
p a.sort_by{ |i| (i-R).abs }[0]
Замечания по решению: Не полностью верное решение!При нескольких равноудаленных элементах выводится только одно значение!
В принципе задачи по нахождению мин или макс в массиве предполагают находить хотя бы одно соответствующее решение. Задание: "Найти элемент!!! массива".
Возможное решение:
R,arr = 13.0, [3.1, 7.2, 10.3, 10.6, 15.5]
require 'enumerator'
arr.each_cons(2){|a,b| if a <=R and b>=R then if R-a<=b-R then p a else p b end end}
Замечания по решению: неправильно и не читабельно, насколько я понял, ошибка в том что не дописан else для первого if.
Возможное решение:
arr, a = [ 1.3, 1.51, 1.46, 0.33, 2.45 ], 1.48
arr.map! { |l| (l-a).abs }.index(arr.min)
Замечания по решению: неточность - нужно найти элемент массива, а не его индекс
Замечания по решению: находится индекс минимальной разницы в массиве разниц
Возможное решение:
R,m = 13.0, [3.1, 7.2, 10.3, 15.5]
dif = m.map{|elem| (R - elem).abs}
p m[dif.index(dif.min)]
BlindMan (обсуждение) 22:12, 28 сентября 2012 (UTC)
Возможное решение:
arr_f = Array.new(100){|x| x = rand(0.0 .. 1.5)}
r = rand(0.0 .. 1.5)
val = 0
n = (arr_f[0] - r).abs
for i in 0..arr_f.length-1
(arr_f[i]-r).abs < n ? (val = arr_f[i]; n = (arr_f[i]-r).abs) : n
end
print("---Наболее близкое значение к #{r} это #{val} ", "\n")
Дан целочисленный массив. Необходимо найти максимальный нечетный элемент.
[править]Возможное решение:
a = [1, 2, 3, 4, 5, 6, 7, 8]
p a.select{ |i| i.odd? }.max
Замечания по решению:
Возможное решение:
a = [1, 2, 3, 4, 5, 6, 7, 8]
p( a.select{ |i| i%2 == 1 }.max )
Замечания по решению:
Возможное решение:
a = [1, 2, 3, 4, 5, 6, 7, 8]
p a.reject{ |i| i.even? }.max
Замечания по решению:
Дано целое число. Необходимо найти все натуральные делители этого числа.
[править]Возможное решение:
a = 12
b = (1..a)
p( b.select{ |n| (a%n==0) } )
Замечания по решению:
Возможное решение:
n = 20
mas = (1..n).to_a
p( mas.find_all{ |x| x%n == 0 } )
Замечания по решению:
Решение аналогично предыдущему, find_all - синоним select; переводить диапазон в массив - лишнее.
Дан целочисленный массив. Вывести индексы элементов, которые меньше своего левого соседа, и количество таких чисел.
[править]Возможное решение:
m = [5, 4, 1, 3, 2, 7, 0, 1, 7]
temp = (1...m.size).select{ |x| m[x] < m[x-1] }
p temp, temp.size
Замечания по решению:
Дан целочисленный массив и отрезок a..b. Необходимо найти количество элементов, значение которых принадлежит этому отрезку.
[править]Возможное решение:
m = [1, 2, 3, 4, 5]
ab = (3..5)
p m.count{ |i| ab === i }
Замечания по решению:
Возможное решение:
m = [1, 2, 3, 4, 5]
a,b = 3,5
m.select{ |i| (a..b).include?( i ) }.size
Замечания по решению:
Возможное решение:
m = [1, 3, 4, 5, 6, 9, 3]
indd = 0..m.size-1
a,b = 3,7
p indd.select{ |n| (m[n] >= a)&&(m[n] <= b) }.size
Замечания по решению:
Возможное решение:
m = [10,1,51,12,14,100]
s = (1..10)
p m.select{|i| s === i}.length
Замечания по решению:
Дан целочисленный массив. Необходимо вывести вначале его элементы с четными индексами, а затем - с нечетными.
[править]Возможное решение:
m = [1,2,3,4,5,6,7]
s = (0..m.size-1).to_a
p s.partition{ |i| i[0].zero? }.flatten.map{ |i| m[i] }
Замечания по решению:
Возможное решение:
a = [1,2,3,4,5,6]
(0...a.size).partition{ |x| x%2 == 0 }.flatten.map{ |x| a[x] }
Замечания по решению:
Возможное решение:
arr = [3, 7, 10, 6, 15]
p arr.partition{|e| arr.index(e)%2 == 0}
Замечания по решению: Решение неверно: дает неверный результат в массиве с несколькими одинаковыми числами.
Возможное решение:
m = [1,2,3,4,5,6,7,8,9,10]
0.step(m.size-1, 2){|i| print "#{m[i]} " }
1.step(m.size-1, 2){|i| print "#{m[i]} " }
Замечания по решению:
Возможное решение:
a = [7,0,4,6,0,3,6,9,0]
(0...a.size).each { |i| i.odd? a.push(a.delete_at(i)) }
Замечания по решению: - не правильное решение, i.odd? проверяет индексы от а, а в этот момент a.delete_at(i) уже изменил массив, уменьшив его на один элемент
Возможное решение: к чему сложности...
arr = Array.new(100){|x| x = rand(0..100000)}
even_ ={}; noeven_= {}
for i in 0 .. arr.length-1
i.even? ? even_[i] = arr[i] : noeven_[i] = arr[i]
end
print(even_,"\n", noeven_, "\n")
Дан целочисленный массив. Необходимо найти минимальный четный элемент.
[править]Возможное решение:
a = [1, 2, 3, 4, 5]
p a.select{ |i| i.even? }.min
Замечания по решению:
Возможное решение:
a = [1, 2, 3, 4, 5]
p a.reject{ |i| i.odd? }.min
Замечания по решению:
Возможное решение:
a = [1, 2, 3, 4, 5]
p a.select{ |i| i[0] == 0 }.min
Замечания по решению:
Возможное решение:
a = [1, 2, 3, 4, 5]
p a.select{ |i| i%2 == 0 }.min
Замечания по решению:
Дан целочисленный массив. Найти среднее арифметическое модулей его элементов.
[править]Возможное решение:
a = [1, 2, 3, 4, 5]
p (a.inject(0){ |sum, i| sum + i.abs }.to_f) / a.size
Замечания по решению:
Возможное решение:
mac = [1, 2, 3, 4, 5]
d = mac.size
jopa = mac.map{ |jo| jo.abs }
j = jopa.inject(0){ |c,jo| c+jo }
j/d
Замечания по решению:
Дан целочисленный массив. Найти все элементы, которые меньше среднего арифметического элементов массива.
[править]Возможное решение:
a = [1, 2, 3, 4, 5]
b = a.inject(0){ |b,c| b + c }.to_f / a.size
a.select{ |i| i < b }
Замечания по решению:
Возможное решение:
a = [1, 2, 3, 4, 5, 6]
b = a.inject(:+).to_f / a.size
a.select{ |i| i < b }
BlindMan (обсуждение) 12:00, 29 сентября 2012 (UTC)
Дан целочисленный массив. Необходимо найти количество минимальных элементов.
[править]Возможное решение:
a = [1, 1, 1, 2, 3, 4]
p a.count{ |i| i == a.min }
Замечания по решению:
Возможное решение:
m = [1, 1, 1, 2, 3, 4]
a = m.min
b = m.select{ |i| i == a }
p b.size
Замечания по решению:
Возможное решение:
m = [1, 2, 3, 4, 5]
p m.select{ |x| x == m.min }.size
Замечания по решению:
Дано число А и натуральное число N. Найти результат следующего выражения 1 + А + А*2 + А*3 + … + А*N.
[править]Возможное решение:
A,N = 10,15
p (1..N).inject(1){ |s,i| s+A*i }
Замечания по решению:
Возможное решение:
A,N = 20,15
(0..N).map{ |x| x*A }.inject(1){ |x,y| x+y }
Замечания по решению:
Дано натуральное число n. Необходимо найти число n!!, где n!! = 1*3*5*...*n для нечетного n и n!! = 2*4*6*...*n для четного.
[править]Возможное решение:
n = 15
maccuB = (1..n).to_a
maccuB = maccuB.partition{ |i| i[0].zero? }[ n%2 ]
p( maccuB.inject(1){ |result,elem| result*elem } )
Замечания по решению:
Возможное решение:
n = 23
a = (1..n).to_a
p( a.partition{ |x| x%2 == 0 }.select{ |x| x.index( a[-1] ) }.flatten.inject(1){ |rez,x| rez*x } )
Замечания по решению:
Возможное решение:
n=7
product=1
n.step(1,-2){|v| product*=v}
p product
Замечания по решению: вот это красота! Только лучше .inject(:*) для произведения использовать
Возможное решение:
n = 11
p (1..n).inject(1){|pr,e| pr= (e%2 ==n%2)? pr*e : pr}
Замечания по решению:
Дан целочисленный интервал a..b. Необходимо найти произведение кубов всех нечетных чисел в этом интервале.
[править]Возможное решение:
ab = (2..6)
p ab.inject(1){ |pr, i| pr = i.odd? ? pr*(i**3) : pr }
Замечания по решению:
Возможное решение:
a,b = 4,19
p( (a..b).to_a.select{ |i| i[0]==1 }.map{ |elem| elem**3 }.inject(1){ |pe3yJIbTaT,nepemeHHa9| pe3yJIbTaT*nepemeHHa9 } )
Замечания по решению:
Дан массив чисел. Необходимо проверить, чередуются ли в нем целые и вещественные числа.
[править]Возможное решение:
m = [1, 2.5, 3, 3.5, 4, 4.5]
p s = (1...m.size-1).all?{ |i| (m[i-1]*m[i]).integer? == (m[i+1]*m[i]).integer? }
Замечания по решению:
неоднозначное решение, предлагаю ниже своё решение
Возможное решение:
array=[1.1,1,2.2,3,7.5]
int=array[0].integer? ? 0 : 1
p array.partition{|v| v.integer?}.flatten==(0..array.size-1).partition{|i| (i+int)[0].zero?}.flatten.map{|i| array[i]}
Замечания по решению:
Возможное решение:
arr = [1, 2.5, 3, 3.5, 5, 4.5]
tmp = arr.partition{|e| arr.index(e)%2==0}
p tmp.select{|e| e.all?{|el| el.to_s.include? '.'}}.size==1
Замечания по решению:
Возможное решение:
array=[1.1,1,2,3,7.5]
p array.map!{|i| i.integer? ? 0 : 1}.all?{|i| array[i]!=array[i+1]}
Замечания по решению:
Дан целочисленный массив и интервал a..b. Необходимо найти сумму элементов, значение которых попадает в этот интервал.
[править]Возможное решение:
m = [1, 2, 3, 4, 5, 6, 7, 8]
ab = (3..5)
p m.select{ |i| ab === i }.reduce(:+)
Замечания по решению:
Возможное решение:
m = [1, 3, 7, 8, 9]
a = 1
b = 8
p m.select{ |i| (a..b).include?(i) }.inject(0){ |s,i| s+i }
Замечания по решению:
Возможное решение:
arr = [1, 5, 3, 7, 4, 8]
a,b=3,7
p arr.inject(0){|s,e| s= (a..b).include?(e) ? s+e : s}
Замечания по решению:
Дан целочисленный массив. Необходимо вывести вначале его положительные элементы, а затем - отрицательные.
[править]Возможное решение:
a = [1, 2, -3, 3, 7, -4, 6]
p a.sort.reverse
Замечания по решению:
Возможное решение:
a = [5, -3, 6, 0, -6]
p a.partition{ |i| i >= 0 }.flatten
Замечания по решению:
Возможное решение:
a = [1, -1, 3, 0, 5, -7]
k = a.select{ |i| i >= 0 }
s = a.select{ |i| i < 0 }
p k + s
Замечания по решению:
Возможное решение:
array1 = [1, -2, 3, -4, 5, -6]
array2 = array1.find_all{ |elem| elem >= 0 }
array3 = array1.find_all{ |elem| elem < 0 }
p array2 + array3
Замечания по решению: