На языке pascal abc реализовать программу,выводящую первых k четных чисел 2,6,10,.(k задаётся с клавиатуры) можно через while и repeat и с объяснением 

Program znanija2;
var number, K:integer; //определяем переменные, number - переменная для вывода
begin
  readln(K); //читаем K c клавиатуры
  while number <> K do begin //ставим условия пока number не будет равнятся K
    number:=number+2; //повышаем number на 2
    writeln(number); //выводим number на экран с новой строки
  end;
end.