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

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