Что не так

@Владислава77777 · Регистрация: 08.11.2016

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

Дана задачка на паскале. Вот условие:
Даны натуральные числа n, a1, …, an. Определить количество членов ak последовательности a1, …, an, имеющих четные порядковые номера и являющихся нечетными числами.
Ввод
В первой строке содержится натуральное число n (1≤n≤100) – количество членов последовательности. Во второй строке содержатся натуральные числа a1, …, an (1≤ak≤10000) – члены последовательности.
Вывод
Вывести целое число – количество членов последовательности, имеющих четные порядковые номера и являющихся нечетными числами.
Вот решение:

Pascal
1
2
3
4
5
6
7
8
9
10
Var i, n, k, a: integer;
begin readln(n);
k:=0;
for i:=1 to n do 
begin readln(a);
if (a mod 2 = 0) and (i mod 2 = 0) then 
inc(k);
end;
writeln(k); 
end.

Сервер пишет ошибку: ошибка времени исполнения

Что не так?

ФедосеевПавел · 09.11.2016, 20:41

Сообщение от Владислава77777

четные порядковые номера и являющихся нечетными числами

Pascal
1
(i mod 2 <> 0)

Добавлено через 1 минуту

Сообщение от Владислава77777

Во второй строке содержатся натуральные числа a1, …, an

Pascal
1
begin read(a);

@Владислава77777 · 10.11.2016, 18:29 **[ТС]**

ФедосеевПавел, то есть программа выглядит так:

Pascal
1
2
3
4
5
6
7
8
9
10
var i, n, k, a: integer;
begin readln(n);
k:=0;
for i:=1 to n do 
begin read(a);
if (i mod 2 <> 0)then 
inc(k);
end;
writeln(k); 
end.

@Puporev · 10.11.2016, 18:47

Pascal
1
2
3
4
5
6
7
8
9
10
11
var i, n, k, a: integer;
begin
readln(n);
k:=0;
for i:=1 to n do
 begin
  read(a);
  if (i mod 2=0)and not odd(a)then inc(k);
 end;
writeln(k);
end.

@Владислава77777 · 10.11.2016, 19:16 **[ТС]**

Puporev, сайт не принимает это решение, пишет, что неверный ответ( можно как-то изменить код?

@bormant · 10.11.2016, 19:29

Pascal
1
2
3
4
5
6
7
8
var n, k, a: Integer;
begin
  Read(n); {k:=0;}
  for n:=1 to n do begin
    Read(a); if not Odd(n) and Odd(a) then Inc(k);
  end;
  Write(k);
end.

@Владислава77777 · 10.11.2016, 19:51 **[ТС]**

bormant, Спасибо большое

Добавлено через 5 минут
bormant, можете помочь решить еще задачку?

Добавлено через 7 минут
Даны натуральные числа n, a1, …, an. Определить количество членов ak последовательности a1, …, an, имеющих четные порядковые номера и являющихся нечетными числами.
Ввод
В первой строке содержится натуральное число n (1≤n≤100) – количество членов последовательности. Во второй строке содержатся натуральные числа a1, …, an (1≤ak≤10000) – члены последовательности.
Вывод
Вывести целое число – количество членов последовательности, имеющих четные порядковые номера и являющихся нечетными числами.

@Puporev · 10.11.2016, 19:54

Не по теме:

Похоже крыша совсем поехала..

@Владислава77777 · 10.11.2016, 20:00 **[ТС]**

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

@Puporev · 10.11.2016, 20:10

А зачем снова написал задачу ту что в первом посте?

@Владислава77777 · 10.11.2016, 20:11 **[ТС]**

Чтобы не создавать новую тему

и можно обращаться ко мне на Вы и добавлять к глаголам окончание -а, я девушка

@bormant · 10.11.2016, 20:17

Сообщение от Владислава77777

помочь решить еще задачку?

Эта задачка уже решена в сообщении #6.
Она та же самая, что и в стартовом сообщении темы.

Для новой задачи создайте отдельную тему.
Уважьте уж правила форума, одна задача - одна тема.

@Владислава77777 · 10.11.2016, 20:32 **[ТС]**

bormant, ой, простите, ошиблась с условием новой задачки
хорошо, была не в курсе

Добавлено через 13 минут
Puporev, хорошо?

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++ 8Observer8 10.03.2026 Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:	Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE 8Observer8 10.03.2026 Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .	Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки Neotwalker 08.03.2026 Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .	Модульная разработка через nuget packages DevAlt 07.03.2026 Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .
Модульный подход на примере F# DevAlt 06.03.2026 В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .	Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование 8Observer8 05.03.2026 Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .	SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D 8Observer8 04.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .	SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий 8Observer8 02.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip Сканируйте QR-код на мобильном и вы увидите, что появится джойстик для управления главным героем. . . .

@Владислава77777 0 / 0 / 0 Регистрация: 08.11.2016 Сообщений: 156
	10.11.2016, 19:16 [ТС]
	Puporev, сайт не принимает это решение, пишет, что неверный ответ( можно как-то изменить код? 0

@Владислава77777 0 / 0 / 0 Регистрация: 08.11.2016 Сообщений: 156
	10.11.2016, 19:51 [ТС]
	bormant, Спасибо большое Добавлено через 5 минут bormant, можете помочь решить еще задачку? Добавлено через 7 минут Даны натуральные числа n, a1, …, an. Определить количество членов ak последовательности a1, …, an, имеющих четные порядковые номера и являющихся нечетными числами. Ввод В первой строке содержится натуральное число n (1≤n≤100) – количество членов последовательности. Во второй строке содержатся натуральные числа a1, …, an (1≤ak≤10000) – члены последовательности. Вывод Вывести целое число – количество членов последовательности, имеющих четные порядковые номера и являющихся нечетными числами. 0

@Puporev
	10.11.2016, 19:54
	Не по теме: Похоже крыша совсем поехала.. 0

@Владислава77777 0 / 0 / 0 Регистрация: 08.11.2016 Сообщений: 156
	10.11.2016, 20:00 [ТС]
	Puporev, чего вы ругаетесь? просто ребенок не может решить задачку, вот и надеется на умненьких программистов, что они помогут 0

@Puporev Почетный модератор 64315 / 47611 / 32743 Регистрация: 18.05.2008 Сообщений: 115,167
	10.11.2016, 20:10
	А зачем снова написал задачу ту что в первом посте? 0

@Владислава77777 0 / 0 / 0 Регистрация: 08.11.2016 Сообщений: 156
	10.11.2016, 20:11 [ТС]
	Чтобы не создавать новую тему и можно обращаться ко мне на Вы и добавлять к глаголам окончание -а, я девушка 0

@Владислава77777 0 / 0 / 0 Регистрация: 08.11.2016 Сообщений: 156
	10.11.2016, 20:32 [ТС]
	bormant, ой, простите, ошиблась с условием новой задачки хорошо, была не в курсе Добавлено через 13 минут Puporev, хорошо? 0