решить задачу по программированию на напишите программу Суммарный индексИмя входного файла: стандартный вводИмя выходного файла: стандартный выводОграничение по времени: 1 секундаОграничение по памяти: 256 мегабайтВ параллельной вселенной Винни — не просто медведь, а медведь-айтишник. Летом он выбралжертву, которая не может программировать, и дал ей возможность получить сообщение с готовымпрограммным кодом от случайного человека из другой вселенной. Этот человек — Вы!Для того, чтобы ему , Вам нужно вывести элемент массива a на позиции, равной суммепозиций минимального и максимального элемента массива. ему.Формат входных данныхВ первой строке вводится n (1 ⩽ n ⩽ 50) — количество чисел в массиве a.Во второй строке вводится n чисел ai (0 ⩽ ai ⩽ 50) — элементы массива a.Если максимальных или минимальных значений несколько, используйте первый из них.Формат выходных данныхВыведите искомый элемент или строку «Vne massiva», если искомый индекс выходит за границымассива.Примерыстандартный ввод стандартный вывод5 21 5 2 4 3 3 Vne massiva1 2 3 1 Vne massiva5
Ответы
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Популярные вопросы в разделе
Назвіть мені 10 слів зі слова велосипедист
Автор: Ka-tja78
Какое представление числа 0, 342234Е-02 является верным: a) 0, 00342234 b) 34, 2234 c) 0, 0342234
Автор: ValerevnaRustam1072
Внимание! Если программа не работает, обновите версию!
begin
var A:=MatrGen(6,7,(i,j)->Sin(i+1)+Cos(3*(j+1)));
A.Println(10,6); Writeln(70*'-');
var B:=A.ElementsWithIndexes.Where(t->t[1].IsEven and t[2].IsEven)
.Select(t->t[0]).ToArray;
B.Println;
var m:=B.Where(t->t>0).DefaultIfEmpty.Average;
Writeln('Искомое среднее равно ',m);
var f:=OpenWrite('MyFile.txt');
for var i:=0 to A.RowCount-1 do begin
for var j:=0 to A.ColCount-1 do
Write(f,A[i,j],' ');
Writeln(f);
end;
Writeln(f);
for var i:=0 to B.Length-1 do Write(f,B[i],' ');
f.Close;
end.