Составить алгоритм нахождения всех неотрицательных чисел стоящих на четных местах в последовательности x1,x2,x3,...,Xn
Составить алгоритм нахождения всех неотрицательных чисел стоящих на четных местах в последовательности x1,x2,x3,...,Xn
Ответ(ы) на вопрос:
1 2 3 4 5 6 7 8 9 и т.д
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.
Не нашли ответ?
Похожие вопросы