Задачки на лето

[Rusl92]

Здравствуйте уважаемые форумчане!
Пожалуйста помогите решить задачку, а то летом мало решал их и в голову ничего не идет! Прошу решить не полностью, а хотя бы идеи по решению или наброски, заранее всем спасибо, кто откликнется!!
Ученик Вася потерял дневник. Не специально. Просто так потерял. В его дневнике были только пятерки, четверки и тройки, и Вася знал общее количество K своих оценок. А еще Вася почему-то помнил сумму S всех своих оценок.
Требуется составить программу, которая восстанавливает оценки Васи, т.е. находит все возможные наборы из K чисел, в которые входят только пятерки, четверки и тройки с общей суммой S.
Технические требования:
Входной файл: INPUT.TXT.
Выходной файл: OUTPUT.TXT.


Формат входных данных:
Входной файл INPUT.TXT содержит два разделенных пробелом целых числа K и S, задающих соответственно общее число и сумму оценок из дневника Васи
Формат выходных данных:
Выходной файл OUTPUT.TXT содержит число –1, если нет ни одного требуемого набора. Если же имеются N воз-можных наборов, то выходной файл содержит N строк. В каждой строке содержатся три разделенных пробелом целых числа — количество пятерок, количество четверок, количест-во троек.

Пример файла входных данных:
8 35
Пример файла выходных данных:
3 5 0
4 3 1
5 1 2
Вот...

[puporev]

Это задача из темы Решение линейных Диофантовых уравнений. Нужно найти целочисленные решения системы уравнений, где количество уравнений меньше числа неизвестных. В паскале такие задачи решаются так:

for x:=0 to s div 3 do
for y:=0 to s div 4 do
for z:=0 to s div 5 do
if (3*x+4*y+5*z=s) and(x+y+z=k)
then writeln(x,' ',y,' ',z,' ');

где x,y,z-количество троек, четверок, пятерок.
Посмотрел внимательнее условие и вношу поправку. Если в дневнике точно были 3,4,5, то циклы нужно делать не от ноля, а от 1.

[Rusl92]

Пример файла входных данных:
8 35
Пример файла выходных данных:
3 5 0
4 3 1
5 1 2
Почему не выводит 3 5 0?

[PAWLO1993]

Вот, виводит все как у примере выходных данных:

Program NoName;
var x,y,z,s,k:integer;
Begin 
readln(k,s);
for x:=0 to s div 3 do   
for y:=0 to s div 4 do   
for z:=0 to s div 5 do   
if (3*x+4*y+5*z=s) and(x+y+z=k)   
then writeln(z,' ',y,' ',x)
end.

[puporev]

Если начинать циклы с ноля, то выводит, если с единицы, то естественно не выводит. Вы определитесь с условием. Написано

В его дневнике были только пятерки, четверки и тройки

Значит все эти оценки были хотя бы по 1 разу, т.е цикл нужно начинать с 1. Если хотите, чтобы были ноли, начинайте с ноля. Я все это написал в своем предыдущем посте.

[Rusl92]

А расскажите пожалуйста, про тему Решение линейных Диофантовых уравнений, в которой нужно найти целочисленные решения системы уравнений, где количество уравнений меньше числа неизвестных. (ход решения задачи). Просто я не порнял ход решения

[puporev]

А Вы наберите в Гугле ""линейные Диофантовы уравнения" и почитайте, я так рассказать не смогу. Кратко: составляется уравнение типа ax+by=с и находятся его целочисленные решения. Есть методы решения "на бумаге", есть машинные. У нас два уравнения, или ситема. 1-если (количество троек*3)+(количество четверок*4)+(количество пятерок*5)=заданной сумме, 2. количество троек+количество четверок+количество пятерок=заданному количеству оценок. Если оба условия совпадают, то компьютер выдает все возможные решения на экран, это же можно сделать вручную.

[Rusl92]

спасибо Вам большое! я просто вчера недопонял. как задача решается, а перед сном просто спокойно обдумал и все понял!