Выберите верную программу для задачи:
Дано целое число. Если оно является положительным, то прибавить к нему 1; если отрицательным, то вычесть из него 6; если нулевым, то заменить его на 19. Вывести полученное число.

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