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