Даны натуральные числа n, a1, … , an. Определить количество членов аk последовательности a1, … , an , имеющих четные порядковые номера и являющихся нечетными числами- QBasic(Бейсик) — Справочник разработчика. Приемная комиссия

input "vvedite kolichestvo chisel ",n
for i=1 to n
input"vvedite chislo ",a
if i mod 2=0 and a mod 2=1 then k=k+1
next
print k