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

0 голосов
21 просмотров

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


image

Информатика (155 баллов) | 21 просмотров
Дано ответов: 2
0 голосов
Правильный ответ

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]

(5.6k баллов)
0 голосов

Так?
#include
#include
#include
using namespace std;

int main()
{
vector v(50);
srand(time(0));
cout <<"Массив:" <<endl;<br> int min;
for(auto it=v.begin(); it!=v.end(); ++it)
{
*it=rand()%101-50;
if(*it%2!=0) min=*it;
cout <<*it <<" ";<br> }
cout <<endl;<br>
for(auto it=v.begin(); it!=v.end(); ++it)
if((*it cout <<"Минимальный элемент: " <<min <<endl;<br>

return 0;
}


image
(1.7k баллов)