var
a:integer;
begin
readln(a);
if a>0 then
a:=a+3;
writeln(a);
end
else
a:=a-2;
end;
end.
Перепиши в тетрадь.
var
a:integer;
begin
readln(a);
if a>0 then
begin
a:=a+3;
writeln(a);
end
else
begin
a:=a-2;
writeln(a);
end;
end.
Перепиши в тетрадь.