Ошибка: ожидался оператор!

Question

Program summa_2; 
uses crt; 
var sum, x:real; 
k:integer; 
 begin 
clrscr; 
sum:=0; 
k:=1; 
writeln; sum:<=10 until do 
 begin 
sum:=sum+1/k; 
k:=k+1; 
end; 
writln(kolichestvo elementov); 
end.

Валентина Степанова · Accepted Answer

writeln; sum:<=10 until do 
Что это за чушь такая? Если вы хотели описать цикл - то он пишется не так.

Елена Орлова · Answer

если используете until, то где оператор repeat? вот его и нету. смотрите внимательнее как работает эта конструкция. и после sum в until не нужно двоеточие.