Форум программистов, компьютерный форум, киберфорум
Наши страницы
PascalABC.NET
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.67/6: Рейтинг темы: голосов - 6, средняя оценка - 4.67
Kopway
0 / 0 / 0
Регистрация: 17.12.2016
Сообщений: 17
1

Задача на перебор вариантов. Задача Л.Эйлера. Про чиновника

17.12.2016, 10:37. Просмотров 1222. Ответов 3
Метки нет (Все метки)

Задача Л.Эйлера. Некий чиновник купил лошадей и быков на сумму 1770 талеров. За каждую лошадь он уплатил по 31 талеру, а за каждого быка по 21 талеру. Сколько лошадей и быков купил чиновник? Используйте прием параметризации, чтобы легче было модифицировать программу при изменении рыночных цен и финансовых возможностей чиновника.
0
QA
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
17.12.2016, 10:37
Ответы с готовыми решениями:

Перебор чисел (Задача)
Есть массив M с произвольными числами от одного до тысячи, N<16. Нужно выяснить можно ли из чисел,...

Задача Коши методам Эйлера(ф-ция 2-го порядка)
Найти приближённое решение задачи Коши y”=f(x;y;y'), y(x0)=y0, y'(x0)=y0' или y'''=f(x;y;y';y''),...

[Code review] Задача о перечислении всех вариантов в системе счисления
const N = 3; M = 1; var &Array: array of integer; procedure ToMax(); begin ...

задача на перебор вариантов
входные данные два массива 1 массив содержит суммы к примеру array(6,6,8) 2-массив содержит...

Задача на перебор вариантов
Помогите пожалуйста.Для заданного числа проверьте, является ли оно суммою квадратов двух чисел. ...

3
Puporev
Модератор
57766 / 44018 / 30393
Регистрация: 18.05.2008
Сообщений: 105,234
17.12.2016, 11:11 2
Pascal
1
2
3
4
5
6
7
8
9
var b,l,sb,sl,s:integer;
begin
sb:=21;
sl:=31;
s:=1770;
for b:=1 to s div sb do
for l:=1 to (s-b*sb) div sl do
if b*sb+l*sl=s then writeln(b,' ',l);
end.
0
Kopway
0 / 0 / 0
Регистрация: 17.12.2016
Сообщений: 17
17.12.2016, 12:26  [ТС] 3
А в какой строчке можно было бы модифицировать программу при изменении рыночных цен и финансовых возможностей чиновника?
0
Puporev
Модератор
57766 / 44018 / 30393
Регистрация: 18.05.2008
Сообщений: 105,234
17.12.2016, 12:43 4
Присвоить другие значения sb, sl, s
1
17.12.2016, 12:43
Answers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
17.12.2016, 12:43

Перебор. Задача про ферзей.
На шахматной доске требуется расставить 8 ферзей, что бы ни один ферзь не атаковал другого....

Задача Эйлера
Здравствуйте. Хочу решить четвертую задачу Эйлера, а именно: Число-палиндром с обеих сторон...

Задача из проекта Эйлера
Пятизначное число 16807=75 является также пятой степенью натурального числа. Аналогично,...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2019, vBulletin Solutions, Inc.