Блок-схема
Объяснение:
Program dz;
var a:integer;
begin
read(a);
if a mod 2 = 0 then
a:=a+1;
end
else
a:=a-2;
end;
writeln(a);
end.
Блок-схема
Объяснение:
Program dz;
var a:integer;
begin
read(a);
if a mod 2 = 0 then
begin
a:=a+1;
end
else
begin
a:=a-2;
end;
writeln(a);
end.