repeatuntil循环 repeat循环语句怎么用

repeat语句(pascal)？程序中repeat loop的格式为：repeat loop body statement；until条件表达式；repeat loo...