Предмет: Информатика,
автор: Dzhekipas
Доказать, что любую целочисленную денежную сумму,большую 7 руб., можно выплатить без сдачи трешками и пятерками.Для данного n > 7 найти такие целые неотрицательные a и b, что 3a +5b = n. pascal
Ответы
Автор ответа:
2
Program asd;
Var a,b,n:integer;
Begin
readln (n); {стоимость}
for a:=0 to 9 do
for b:=0 to 9 do
if (3*a)+(5*b)=n
then writeln (3*a,'+',5*b,'=',n);
end.
Проверь тк.писал схода
Var a,b,n:integer;
Begin
readln (n); {стоимость}
for a:=0 to 9 do
for b:=0 to 9 do
if (3*a)+(5*b)=n
then writeln (3*a,'+',5*b,'=',n);
end.
Проверь тк.писал схода
Похожие вопросы
Предмет: Физика,
автор: timberland24
Предмет: Биология,
автор: 8778081555b
Предмет: История,
автор: Аноним
Предмет: Русский язык,
автор: karinazhdanova87
Предмет: Обществознание,
автор: ekaterinarogaceva987