#include "stdafx.h"
#include < iostream>
using namespace std;
int main(int argc, char* argv[])
{
cout < < "obrabotka massiva" < < endl;
int array1[16] = { 5, -12, -12, 9, 10, 0, -9,
-12, -1, 23, 65, 64, 11, 43, 39, -15 }; // объявление и инициализация одномерного массива
cout < < "indeks" < < "\t\t" < < "element massiva" < < endl; // печать заголовков
for (int counter = 0; counter < 16; counter++) //начало цикла
{
//вывод на экран индекса ячейки массива, а затем содержимого этой ячейки, в нашем случае - это целое число
cout < < "array1[" < < counter < < "]" < < "\t\t" < < array1[counter] < < endl;
}
system("pause");
return 0;
}
#include "stdafx.h"
#include < iostream>
using namespace std;
int main(int argc, char* argv[])
{
cout < < "obrabotka massiva" < < endl;
int array1[16] = { 5, -12, -12, 9, 10, 0, -9,
-12, -1, 23, 65, 64, 11, 43, 39, -15 }; // объявление и инициализация одномерного массива
cout < < "indeks" < < "\t\t" < < "element massiva" < < endl; // печать заголовков
for (int counter = 0; counter < 16; counter++) //начало цикла
{
//вывод на экран индекса ячейки массива, а затем содержимого этой ячейки, в нашем случае - это целое число
cout < < "array1[" < < counter < < "]" < < "\t\t" < < array1[counter] < < endl;
}
system("pause");
return 0;
}
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(ReadInteger('n='),-50,50); a.Println;
var s:=a.Distinct.OrderBy(x->x).Reverse.Skip(1);
if s.Count>0 then begin
var i:=a.FindIndex(t->t=s.First);
Writeln('Искомый элемент равен ',a[i],' его порядковый номер ',i+1)
end
else Writeln('Нет искомых элементов')
end.
Пример
n= 13
-7 -2 -32 9 21 -31 34 -34 27 -35 11 7 -10
Искомый элемент равен 27 его порядковый номер 9