Цикл с постусловием ( Repeat, ДО) Требуется ввести двузначное число, если пользователь вводит число не удовлетворяющее условию, то ему предлагается вновь вводить число, до тех пор пока нужное число не будет введено.
Var a:integer; begin repeat // число, которое надо ввести - 47 writeln('Введите двузначное число'); readln(a); until a<>47; writeln('Введенное число ', a); end.
нужно вновь ввести число, до тех пор пока нужное число не будет введено
Ну так этот цикл и работает. До тех пор пока пользователь не введет двухзначное число н
Или есть какое-то двузначное число и нужно ввести значение равное ему?
вот именно, что нет. Учительница говорит, что нужно ввести само двузначное число!!
Хорошо, сейчас изменю код
Так пойдет?
Да, спасибо)