Выбери верный код программы для решения задачи.

Дано целое число. Если оно является положительным, то прибавить к нему \(1\); если отрицательным, то вычесть из него 4; если нулевым, то заменить его на 13. Вывести полученное число.

• program zadaca;
  var
  begin
  writeln('Введи число a');
  readln(a);
  if a > =0 then
  if a=0 then a:=13 else a:=a+1
  else a:=a-4;
  writeln(a);
  readln;
  end.
• program zadaca;
  var
  a: integer;
  begin
  writeln('Введи число a');
  readln(a);
  if a > =0 then
  if a=0 then a:=13 else a:=a+1
  else a:=a-4;
  writeln(a);
  readln;
  end.
• program zadaca;
  var
  a: integer;
  begin
  writeln('Введи число a');
  readln(a);
  if a > =0 then
  if a=0 then a:=13 else a:=a+1
  else a:=a-4;
  end.