Даны натуральные числа n, . составьте программу, которая определяет количество членов последовательности , с чётными порядковыми номерами и нечётными значениями.

213

404

Посмотреть ответы 2

Ответы на вопрос:

krizhnaya111

Информатика

4,6(100 оценок)

Var i,n,k: integer; a: array[1..100] of integer; begin readln(n); for i: =1 to n do read(a[i]); for i: =1 to n do if odd(a[i]) and not odd(i) then inc(k); writeln('кол-во элементов с четн.номерами и нечетн.значениями: ',k); end.