Составить алгоритм нахождения всех неотрицательных чисел стоящих на четных местах в последовательности x1, x2, x3, ..., Xn

Question

Христоня

11 марта, 07:23

+3

Ответы (2)

Знаете ответ?

Палюня · Answer 1

Палюня 11 марта, 07:58

0

1 2 3 4 5 6 7 8 9 и т. д

Тараска · Answer 2

Var n, i:integer;

Begin

Readln (n) ;

For i:=2 to n do

Begin

If (i>0) then writeln (i) ;

inc (i, 1) ;

End;

End.