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

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

• program cislo;
  var
  a: integer;
  begin
  writeln('Введи число a');
  readln(a);
  if a > 0 then a:=a;
  writeln(a);
  end.
• program cislo;
  var
  a: integer;
  begin
  writeln('Введи число a');
  readln(a);
  if a < 0 then a:=a+24;
  writeln(a);
  end.
• program cislo;
  var
  a: integer;
  begin
  writeln('Введи число a');
  readln(a);
  if a > 0 then a:=a+24;
  writeln(a);
  end.