Помогите пожалуйста n:=1; begin repeat write(`n=`, n:5) ; until n<=10<br> end
После write('n=',n:5); добавьте n:=n+1;
BeginVar n:=1;repeatwrite('n=', n:5);n:=n+1;until n<=10;end. <br>
begin Var n:=1; repeat write('n=', n:5); until n<=10;<br>end. Вот правильный вариант
Этот вариант выведет только цифру 1, и больше ничего. Если нужно вывести числа от 1 до 10, то нужно исправить until n<=10 на until n>10; и добавить после write('n=',n:5); n:=n+1;
А разве это было прописано в условии?Программа работает-условие выполнено
Какой смысл использовать цикл repeat, если он не работает?
В данной программе цикл repeat определяет,что число меньше или равно 10
В данной программе цикла repeat вообще нет, так как значение переменной n в теле цикла не изменяется.
Да,это ошибка,решение изменил