Програмирование Паскаль Напишите программу, которая выводит на экран числа от 1 до N с шагом 2. N вводится с клавиатуры.
Var a:array [1..100] of integer; k,n,i:integer; begin k:=0; readln (N); while kbegin k:=k+2; writeln (k); end; end.