HLP РЕШИТЬ ТОЛЬКО НА С++ Ввод

5

Вывод 7

МОЙ КОД

ввод

5

вывод

1 1 1 1 1

2 1 1 1

2 2 1

3 1 1

3 2

4 1

5

сделать так чтобы вывод был как первый(первый вывод смотрите выше)

И цельный исправленный код ( )

#include

#include

using namespace std;

void rec(int n, int maxterm, vector terms) {

if (n == 0) {

for (auto now : terms) {

cout << now << " ";

}

cout << endl;

return;

}

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

if (i <= maxterm) {

terms.push_back(i);

rec(n - i, i, terms);

terms.pop_back();

}

}

}

int main()

{

int n;

cin >> n;

vector tmp;

rec(n, n, tmp);

return 0;

}

Var
    s: string;
    a, b: integer;
begin
    readln(s);
    if s[1] = 'x' then begin
        a := StrToInt(s[3]);
        b := StrToInt(s[5]);
        if s[2] = '-' then a := -a;
        writeln(b - a);
    end
    else if s[3] = 'x' then begin
        a := StrToInt(s[1]);
        b := StrToInt(s[5]);
        if s[2] = '-' then begin
            a := -a;
            b := -b;
        end;
        writeln(b - a);
    end
    else if s[5] = 'x' then begin
        a := StrToInt(s[1]);
        b := StrToInt(s[3]);
        if s[2] = '-' then
            b := -b;
        writeln(a + b);
    end
end.

учтите что никакой защиты от дурака или неверного ввода

Надеюсь это то что надо

const
    N = 5;

var
    a: array[1..N] of integer;
    i, iMin: integer;

begin
    writeln('Исходный массив:');
    for i := 1 to N do
    begin
        a[i] := random(100) - 50;
        write(a[i]:4);
    end;
    iMin := 1;{инциируем первым элементом}
    for i := 2 to N do {проверяем все остальные}
        if a[i] < a[iMin] then {новый минимальный}
            iMin := i; {запомнить i}
    writeln; {перейти на новую строку}
    writeln('Минимальный элемент a[', iMin, ']=', a[iMin]);
end.