Помогите заменить repeat и until в этой программе:

Анастасия Сергеевна в категроии Информатика, вопрос открыт 06.12.2017 в 21:37

var x,y:real;
begin;
x:=5;
repeat
y:=4*x-5;
writeln('if x=',x,' then y=',y);
x:=x+0.5;
until x=10.5;
end.