Сколько раз будет выполнен этот цикл?
i:=6;
while i<5 do begin
writeln('Привет!');
i:=i+1;
end;

При входе в цикл будет проверяться условие i<5 ⇒ 6<5 ⇒ falseТак как условие не выполняется (false), то цикл не будет выполнен ни разу.