Задание

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

  • program chislo;
    var a: integer;
    begin
    writeln \(‘Введи число a’\);
    readln \(a\);
    if a>0 then a:=a;
    writeln \(a\);
    end.
  • program chislo;
    var a: integer;
    begin
    writeln \(‘Введи число a’\);
    readln \(a\);
    if a>0 then a:=a+3;
    writeln \(a\);
    end.
  • program chislo;
    var a: integer;
    begin
    writeln \(‘Введи число a’\);
    readln \(a\);
    if a<0 then a:=a+3;
    writeln \(a\);
    end.