ДАЮ 30 БАЛЛОВ.РЕШИТЕ Задачку ПО ОЛИМПИАДЕ ПО ИНФОРМАТИКЕ!!!Решите задачу по олимпиаде

ДАЮ 30 БАЛЛОВ.РЕШИТЕ ЗАДАЧУ ПО ОЛИМПИАДЕ ПО ИНФОРМАТИКЕ!!!
Решите задачку по олимпиаде информатика 9 класс.
Дан массив А размера N. Найти минимальный элемент из его элементов с четными номерами A2, A4, A6, ..
Входные данные. Вводится одно естественное число размер массива
Выходные данные. Выводятся одно число - малый элемент посреди частей с четными номерами (если несколько элементов имеют однообразное значение вывести 1-ый из их)
Пример ввода Пример вывода
1 2 5 6 8 2
0 5 1 3 9 8 3

Задать свой вопрос
1 ответ
Ух уж олимпиадники, елементарную задачку решать не могут..
 Var n,i,k,min:integer;
a:array[1..1000] of integer;
Begin
 readln(n);
 for i:=1 to n do
  read(a[i]);
 min:=a[2];
 for i:=2 to n do
  if i mod 2=0
   then
    if a[i]lt;min
     then min:=a[i];
 writeln(min);
End.

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт