Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
Nactyska5004763256
30.09.2021 22:28 •
Информатика
На ферме содержат кур и кроликов. у всего поголовья 128 лап. вывести на экран все возможные варианты количества кур и кроликов на ферме. ( . )
Показать ответ
Ответ:
Caflen
06.10.2020 05:47
Обозначим количество кроликов r, количество кур - c.
Тогда 2c+4r=128; c+2r=64 → c=64-2r, r=0,1,2,...32
// PascalABC.NET 3.2, сборка 1431 от 28.04.2017
// Внимание! Если программа не работает, обновите версию!
begin
var s:=Range(0,32).Select(r->(r,64-2*r));
Write('(Кролики-куры):'); s.Println
end.
Результат:
(Кролики-куры):(0,64) (1,62) (2,60) (3,58) (4,56) (5,54) (6,52) (7,50) (8,48) (9,46) (10,44) (11,42) (12,40) (13,38) (14,36) (15,34) (16,32) (17,30) (18,28) (19,26) (20,24) (21,22) (22,20) (23,18) (24,16) (25,14) (26,12) (27,10) (28,8) (29,6) (30,4) (31,2) (32,0)
0,0
(0 оценок)
Популярные вопросы: Информатика
sasaaaru
21.09.2020 02:14
В каком разделе меню окна находится команда создать новый слайд а слайд б вид с файл д вставка...
kirill67r
23.11.2022 22:39
Считая, что каждый символ кодируется 8 битами, оцените информационный объём следующей фразы: Привычка свыше нам дана: замена счастью она....
innaalekseenko1
14.09.2022 05:44
Пусть видеопамять компьютера имеет объем 512 Кбайт. Размер графической сетки – 640 х 480. Сколько страниц экрана одновременно разместится в видеопамяти при палитре из 128...
vladysa20055
03.06.2020 09:05
Итоговая работа по теме Обработка текстовой информации : Реферат История вычислительной техники . Материал для реферата на ресурсе http://www.lbz.ru/metodist/authors/informatika/3/eor7.phpРеферат...
Teddy62711
03.12.2022 22:16
Определи, что является надсистемой, выбрав верный ответ. дом стена/ крыша\ \фундамент варианты ответа дом квартира нет правильного варианта ответа стена...
amayorov2002owujgy
31.08.2022 20:03
Итоговая работа по теме Обработка текстовой информации : Реферат История вычислительной техники . Материал для реферата на ресурсе http://www.lbz.ru/metodist/authors/informatika/3/eor7.phpРеферат...
FileoFISH
05.03.2020 08:58
решить,только писать со всеми вычислениями. 1.Среди приведенных ниже 3 чисел,записанных в разных системах счисления,найдите минимальное и запишите его в ответе в десятичной...
Mild06
08.04.2020 18:19
Дан код с номером. Определи, какой это символ: управляющий или изображаемый.Код с номером 29....
pepeon11
28.04.2020 13:24
Запишите 32-битный IP-адрес компьютера в виде четырёх десятичных чисел, разделённых точками: 11010111100101101100000111111100...
23200611
11.01.2022 15:41
Выполните систему счисления 1.1001001+101012.10001000+11100113.111010*10010выполните с проверкой ...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Тогда 2c+4r=128; c+2r=64 → c=64-2r, r=0,1,2,...32
// PascalABC.NET 3.2, сборка 1431 от 28.04.2017
// Внимание! Если программа не работает, обновите версию!
begin
var s:=Range(0,32).Select(r->(r,64-2*r));
Write('(Кролики-куры):'); s.Println
end.
Результат:
(Кролики-куры):(0,64) (1,62) (2,60) (3,58) (4,56) (5,54) (6,52) (7,50) (8,48) (9,46) (10,44) (11,42) (12,40) (13,38) (14,36) (15,34) (16,32) (17,30) (18,28) (19,26) (20,24) (21,22) (22,20) (23,18) (24,16) (25,14) (26,12) (27,10) (28,8) (29,6) (30,4) (31,2) (32,0)