Доказать, что любую целочисленную денежную сумму, большую 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.
Проверь тк.писал схода 

#Python 3.8.3

from typing import *

def FindFirstIndex(source: Iterable[Any], predicate: Callable[[Any], Any]):

   for index, item in enumerate(source):

       if (predicate(item)):

           return index

def main():

   arr = [1, 2, 3, 4, 5, -1, 2, -4]

   firstOdd = FindFirstIndex(arr, lambda p: p % 2 != 0)

   firstNegative = FindFirstIndex(arr, lambda p: p < 0)

   arr[firstOdd], arr[firstNegative] = arr[firstNegative], arr[firstOdd]

   print(arr)

if __name__ == '__main__':

   main()

Объяснение:

#include<bits/stdc++.h>

using namespace std;

int main(){

int n,m,k;

cin>>n>>m>>k;

if(k==m*n-1){

   cout<<"IMPOSSIBLE";

   return 0;

}

char a[n][m];

for(int i = 0; i<n; i++){

   for(int j = 0; j<m; j++){

       if(k>0){

           a[i][j]='U';

           k--;

           cout<<'U';

       } else if((a[i-1][j]=='U' || i==0) && i==n-1 && j!=m-1){

           cout<<'R';

       } else if((a[i-1][j]=='U' || i==0) && i==n-1 && j==m-1){

           a[i][j] = 'L';

           cout<<'L';

       } else if(i==n-1 && a[i-1][j]!='U') {

           cout<<'U';

       } else {

           cout<<'D';

       }

   }

   cout<<endl;

}

return 0;

}

Объяснение

код написан на языке с++;

есть 5 случаев которые приведены в картинках ниже + случай когда n*m-1=k выводит Impossible