Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
крисс1233
25.09.2021 16:20 •
Информатика
Складіть проект для малювання шести прямокутників з довжинами сторін а і b кроків, розміщених один під одним на відстані 10 кроків.
Показать ответ
Ответ:
янина1511
27.05.2021 23:48
# Код на ruby 2.2.3p173
a1, a2 = [], []
for i in 100..999
t = i
s = 0
while t>0
s += t % 10
t = t / 10
end
a1<<i if i%7==0 and s%7==0
a2<<i if i%47==43
end
p a1
p a2
a3 = []
sum = 0
for i in 31..99
if i%3==0 and (i%10==2 or i%10==4 or i%10==8)
a3<<i
sum += i
end
end
p sum
p a3
Вывод
[133, 266, 322, 329, 392, 399, 455, 511, 518, 581, 588, 644, 700, 707, 770, 777, 833, 966]
[137, 184, 231, 278, 325, 372, 419, 466, 513, 560, 607, 654, 701, 748, 795, 842, 889, 936, 983]
378
[42, 48, 54, 72, 78, 84]
0,0
(0 оценок)
Ответ:
Medvedevalilit2004
27.05.2021 23:48
# Код на ruby 2.2.3p173
a1, a2 = [], []
for i in 100..999
t = i
s = 0
while t>0
s += t % 10
t = t / 10
end
a1<<i if i%7==0 and s%7==0
a2<<i if i%47==43
end
p a1
p a2
a3 = []
sum = 0
for i in 31..99
if i%3==0 and (i%10==2 or i%10==4 or i%10==8)
a3<<i
sum += i
end
end
p sum
p a3
Вывод
[133, 266, 322, 329, 392, 399, 455, 511, 518, 581, 588, 644, 700, 707, 770, 777, 833, 966]
[137, 184, 231, 278, 325, 372, 419, 466, 513, 560, 607, 654, 701, 748, 795, 842, 889, 936, 983]
378
[42, 48, 54, 72, 78, 84]
0,0
(0 оценок)
Популярные вопросы: Информатика
alex12345lex
23.09.2022 09:53
Информатиканужно вбить это все в редакторе ворд, не решать уравнения, а вбить ЗАРАНЕЕ ...
jdkxnVAkx
31.05.2022 08:59
Таблица по информатике в Excel...
мот43
31.08.2022 05:47
Задание:У логическую функцию Y=((A+B(черточка сверху)*B)+(A(черточка сверху)*(В+С))...
diankafedulova
15.12.2022 17:32
Какой объем информации содержит черно-белая картинка, состоящая из 128*256 точек?...
загадка28
05.08.2022 08:25
Впрограмме описан одномерный целочисленный массив с индексами от 0 до 10 и целочисленная переменная i. в ниже фрагменте программы массив сначала заполняется, а потом изменяется:...
нур101
05.08.2022 08:25
Для кодирования букв а, б, в, г решили использовать двухразрядные последо- вательные двоичные числа (от 00 до 11 соответственно). если таким зако- дировать последовательность символов...
BotanicPanik
05.04.2021 18:21
Создание документов сложной структуры MS Word Створення документів складної структури у MS Word...
ArtemDenisiuk
20.11.2020 01:07
Пожолоста отправьте мне pdf призинтатции которых у вас есть...
IAmCookie
01.06.2021 00:32
2. В коробке лежат 64 цветных карандаша. Сообщение о том, что достали красныйкарандаш, несет 8 бит информации. Сколько красных карандашей было в коробке?...
Diana15080511
12.11.2022 10:01
решить задачу в паскале, я попытался сам, но выбивает ошибку. Задача 5, вариант 1 var a,b,c,x,y,x1,x2,D:real; begin Writeln ( Введите коэффициенты (a, b, c) ); readln(a,b,c); D:=sqr(b)...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
a1, a2 = [], []
for i in 100..999
t = i
s = 0
while t>0
s += t % 10
t = t / 10
end
a1<<i if i%7==0 and s%7==0
a2<<i if i%47==43
end
p a1
p a2
a3 = []
sum = 0
for i in 31..99
if i%3==0 and (i%10==2 or i%10==4 or i%10==8)
a3<<i
sum += i
end
end
p sum
p a3
Вывод
[133, 266, 322, 329, 392, 399, 455, 511, 518, 581, 588, 644, 700, 707, 770, 777, 833, 966]
[137, 184, 231, 278, 325, 372, 419, 466, 513, 560, 607, 654, 701, 748, 795, 842, 889, 936, 983]
378
[42, 48, 54, 72, 78, 84]
a1, a2 = [], []
for i in 100..999
t = i
s = 0
while t>0
s += t % 10
t = t / 10
end
a1<<i if i%7==0 and s%7==0
a2<<i if i%47==43
end
p a1
p a2
a3 = []
sum = 0
for i in 31..99
if i%3==0 and (i%10==2 or i%10==4 or i%10==8)
a3<<i
sum += i
end
end
p sum
p a3
Вывод
[133, 266, 322, 329, 392, 399, 455, 511, 518, 581, 588, 644, 700, 707, 770, 777, 833, 966]
[137, 184, 231, 278, 325, 372, 419, 466, 513, 560, 607, 654, 701, 748, 795, 842, 889, 936, 983]
378
[42, 48, 54, 72, 78, 84]