Помогите по алгоритму составить формулу для вычесления значения игрик.К х прибавить 1, результат обозначить через b1

Зачем результат обозначать через b1, если можно сделать так: y=x+1, и чтобы потом не переносить значение y и в переменную b1.
Вот решение (через Pascal):

var y, x, b1: integer;
begin
  read(x);
  y:=x+1;
  b1:=y;
  write(b1);
end.