Всего 1 задание по информатике. ПОЖАЛУЙСТА!

Всего 1 задание по информатике. ПОЖАЛУЙСТА!
Гость
Ответ(ы) на вопрос:
Гость
так? #include #include #include using namespace std; int main() { vector v(50); srand(time(0)); cout <<"Массив:" <
Гость
uses crt;var a,b:array [1..50] of integer;    i,j,n,min:integer;begin clrscr; j:=1; for i:=1 to 10 do  begin   write('a[',i,']=');   readln(a[i]);   if (a[i] mod 2)<>0 then                         begin                        b[j]:=a[i];                        j:=j+1;                                               end;  end;   min:=b[1];  for n:=1 to j-1 do   begin    if b[n]