Пользователь ввёл значение x=-7. Что выведет программа? var x: integer; begin readln (x) until x > = 0; writeln ('значение:',sprt(x):0:4); readln end.
Синтаксис не правильный, пользователь ввести ничего не сможет, выдаст ошибку..
Если был бы правильным, то программа запросила БЫ ввод числа, ибо условие x >= 0 неверно.