Помогите с 3 заданием. Там нужно найти ошибку в программе. Срочно нужно.
Program cicl; ←точка с запятой var x : integer; begin x := 1; repeat x := x + 1; writeln('Всем привет!'); until x >= 3; end. ←только один end