Доказать, что любую целочисленную денежную сумму,большую 7 руб., можно выплатить без сдачи трешками и пятерками.для данного n > 7 найти такие целые неотрицательные a и b, что 3a +5b = n. pascal
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.
Проверь тк.писал схода