Дано целое число. Если оно является положительным, то прибавить к нему 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.
Задание

Дано целое число. Если оно является положительным, то прибавить к нему 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.