Ответ:
это будет муляж, потому что его можно потрогать и рассмотреть
var n:integer;
begin
writeln ("введите число N");
read(n);
if n>0 then n:=n+1;
if n<0 then n:=n-1;
writeln (n);
end.
С) Выбрав специальную команду Отменить колонки
59 * 16 = 944 бита!"!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!