В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Hartfilia
Hartfilia
15.11.2021 02:05 •  Информатика

Дан массив из n целых положительных чисел(n не больше 1000),заполненный случайным образом (от 0 до 2000) 1. найти и вывести на экран все трехзначные числа,в которых на первом и последнем месте стоят одинаковые цифры(например 252) 2. подсчитать количество чисел,кратных 3 и не оканчивающихся на 5 и вывести на экран 3. найти сумму всех двузначных четных чисел и вывести на экран 4. найти в массиве числа из диапазона от 100 до 200 включительно и вывести на экран,если таких нет,то заменить все числа на 1 и вывести на экран

Показать ответ
Ответ:
Era2008
Era2008
10.10.2020 00:52

def func1(arr)

 arr.select { |item| (100..999).cover?(item) && (item / 100 == item % 10) }

end


def func2(arr)

 arr.count { |item| (item % 3).zero? && (item % 10 != 5) }

end


def func3(arr)

 sum = 0

 arr.each { |x| sum += x if x.even? && (10..99).cover?(x) }

 sum

end


def func4(arr)

 narr = []

 arr.each { |x| narr.push(x) if (100..200).cover?(x) }

 narr.empty? ? (arr.map { |x| x = 1 }) : narr

end


arr = Array.new(rand(2..1000))

arr.map! { |item| item = rand(0...2000) }

puts 'Исходный массив:'

puts arr

puts "\n1. Найти и вывести на экран все трехзначные числа,в которых на первом и последнем месте стоят одинаковые цифры: "

puts func1(arr)

puts "\n2. Подсчитать количество чисел,кратных 3 и не оканчивающихся на 5 и вывести на экран: "

puts func2(arr)

puts "\n3. Найти сумму всех двузначных четных чисел и вывести на экран: "

puts func3(arr)

puts "\n4. Найти в массиве числа из диапазона от 100 до 200 включительно и вывести на экран,если таких нет,то заменить все числа на 1 и вывести на экран:"

puts func4(arr)

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота