Помогите создать программу

[Лешка картошка]

В одномерном массиве X i (i = 1…5) найти количество элементов с нечетными индексами.
Нужно составить программу, помогите пожалуйста

[Stilet]

Ввод массива составить сможешь?

[Лешка картошка]

да, смогу конечно

[Stilet]

Ну так смоги )

[Лешка картошка]

я просто не могу найти количество элементов с нечетными индексами, поможете?

[ViktorR]

Вопрос то правильно поставлен?
Может все же надо найти число элементов, значения которых нечетные.

количество элементов с нечетными индексами

Это - длину массива надо поделить пополам и прибавить остаток от деления на 2.
Типа:

k := (i DIV 2) + (i MOD 2);

В этом случае надо ввести только ...


Как-то так, ...

[Лешка картошка]

а всю программу не можете написать, просто у меня почему то выдает ошибку

uses crt;
var a:array[1..5] of integer;
i:integer;
k:integer;

begin
clrscr;
for i:=1 to 5 do begin k := (i DIV 2) + (i MOD 2);
writeln(k);
end
end.

[Smogg]

uses crt;
var a:array[1..5] of integer;
i:integer;
k:integer;

begin
clrscr;
 k := (Length(a) DIV 2) + (Length(a) MOD 2);
writeln(k);
end
end.

как-та так
UPD: ни. нисавсем так. Для Pascalя нада ишо учитавать нижний индыкс масива. Ну, это для самастаятельнай праработки.

[Лешка картошка]

если у меня совсем хромает грамотность, то прошу прощения)

[ViktorR]

а всю программу не можете написать, просто у меня почему то выдает ошибку

Вы не ответили на вопрос, что же Вам надо посчитать.
Ваше решение - это демонстрация непонимания задачи и непонимания предложенного решения.
И так:
Вам надо посчитать число нечетных элементов массива?
Вам надо посчитать число нечетных значений, которые хранятся в элементах массива?
А может Вам надо посчитать число нечетных значений, которые хранятся в нечетных элементах массива?


Как-то так, ...