Question

Переведите пожалуйста с pascal на c++ var L, k, n, i: longint; a: array [0..9999] of boolean; begin Readln (L, k); For i:= 1 to k do begin read (n); a[n]:= true; end; if (L mod 2<> 0 ) and (a[L div 2]) then begin write (L div 2); halt; end; For i:= (L-1) div 2 downto 0 do {цикл от середины влево} if a [i] then begin write (i, ' '); break; end; For i:= (L div 2 ) to L-1 do {цикл от середины вправо} if a [i] then begin write (i, ' '); break; end; end.

Answer 1

#include <iostream>

int main(){
long L,k,n,i;
bool *a=new bool[10000]
cin>>L>>k;
for (int i=0;i<k;i++)
{
std::cin>>n;
a[n]=true;
}
if (L%2!=0 & a[L/2])
{
std::cout<<L/2;
return 1;
}
for (int i=(L-1)/2;i>0;i--)
if (a[i])
{
std::cout<<i<<' ';
break;
}
return 0;
}

Answer 2

Вот эквивалентный код на языке C++:

cppCopy code
#include <iostream>
#include <vector>

using namespace std;

int main() {
    int L, k, n, i;
    vector<bool> a(10000, false);

    cin >> L >> k;

    for (i = 1; i <= k; i++) {
        cin >> n;
        a[n] = true;
    }

    if (L % 2 != 0 && a[L / 2]) {
        cout << L / 2;
        return 0;
    }

    for (i = (L - 1) / 2; i >= 0; i--) {
        if (a[i]) {
            cout << i << " ";
            break;
        }
    }

    for (i = L / 2; i < L; i++) {
        if (a[i]) {
            cout << i << " ";
            break;
        }
    }

    return 0;
}

Обратите внимание, что в C++ вам понадобится использовать вектор std::vector<bool> вместо статического массива boolean. Также я добавил директиву using namespace std; для упрощения кода, но это можно избежать, используя std:: перед стандартными именами (например, std::cin, std::cout, std::vector, и т.д.).