Укажите, сколько раз выполнится тело цикла с данным заголовком:
k:=-1;
WHILE K>3 DO K:=K+2;