Как в pascal в if прописать несколько значений переменной
If a<(>)=10 then repeat until b:=a-1 допустим