Question

Помогите с 8 заданием

Answer 1

A8-A 
ПРАВИЛЬНО БУДЕТ ТАК:
while a>b do begin 
x:=x+1;
a:=a-1;
end;