Встречено end а ожидалось выражение program f; var x: integer; y: real; k: =1; begin repeat y: =sqrt(sin(x)/k); k: =k+2; until end.

Объяснение:

после слова until должно быть условие. Компилятор ожидает выражение условия, встречает конец программы

правильный вид:

repeat

   y := sqrt(sin(x)/k);

   k+=2;

until (k < 150) // Это пример, внутри скобок должно быть условие, которое необходимо тебе