В последовательности а1,...,a30 поменять местами наибольший член и член с номером m.

@jenya5455 · Регистрация: 07.11.2012

Author24 — интернет-сервис помощи студентам

Даны натуральное число m, действительные числа а1,..,a30
(числа попарно различны). В последовательности а1,...,a30
поменять местами наибольший член и член с номером m.

есть пример на паскале , дайте код на С++ , спасибо!!!

Pascal

Program esep1;
uses crt;
Var a:array[1..10] of integer;
    i,m,n,c,max:integer;
begin
clrscr;
write('Vvedite m=');
readln(m);
writeln('Vvedite elementy massiva^');
for i:=1 to 10 do
 readln(a[i]);
for i:=1 to 10 do
  write(a[i]:4);
for i:=1 to 10 do
  begin
  if max<a[i] then
    begin
      max:=a[i];
      c:=i;
    end;
  end;
writeln;
writeln('maksimalniy element=',max);
writeln('poziciya maksimalnogo elementa=',c);
writeln('chislo m=',a[m]);
n:=a[c];
a[c]:=a[m];
a[m]:=n;
for i:=1 to 10 do
  begin
    write(a[i]:4);
  end;
writeln;
readln;
end.

@egor2116 · 29.03.2013, 00:14

Как то так наверное

C++

const int SIZE=5;
    int m,a[SIZE],max;
    cout<<"Введите число от 0 до 29"<<endl;
    cin>>m;
 
    for(int i=0;i<SIZE;i++)
         cin>>a[i];
 
    cout<<endl;
    for(int i=0;i<SIZE;i++)
       cout<<a[i]<<" ";
     cout<<endl;
 
    max=a[0];
    int count=0;
    for(int i=0;i<SIZE;i++)
       if(a[i]>max) { max=a[i]; count=i; }
 
 
    for(int i=0;i<SIZE;i++){
       if(max!=m) {
           int tmp=a[count];
           a[count]=a[m];
           a[m]=tmp;
    }
    }
    for(int i=0;i<SIZE;i++)
       cout<<a[i]<<" ";
 
    cout<<endl;

	29.03.2013, 00:14

В последовательности а1,...,a30 поменять местами наибольший член и член с номером m.

Решение