Дано целое число. если оно является положительным, то прибавить к нему 1; если отрицательное, то вычесть 2, если нулевым, то заменить его на 10. вывести полученное число. программа.

Program chislo; var i,p: integer; begin writeln('vvedite chislo'); readln(i); if i< 0 then p: =i-2 else if i=0 then p: =10 else p: =i+1; writeln('p=',p); readln; end.

Int a; cin> > a; if (a> 0)  { cout< < a+1; } else if (a< 0) { cout< < a-2; } else { cout< < 10;   }

Using system; namespace сишарп {       class program       {               static void main(string[] args)               {                       console.write("n = ");                       int n = int.parse(console.;                       console.write("a({0}): ",n);                       int[] a = new int[n];                       random rnd = new random();                       for (int i = 0; i < n; i++)                       {                               a[i] = rnd.next(-n,n+1);                               console.write(" {0}",a[i]);                       }                       for (int i = n - 1; i > = 0 & & a[i] < 0; ;                       int l = 0, j = n;                       while (j > 0)                               if (a[--j] > 0) l++;                               else                                       if (l < 2) l = 0;                                       else break;                       for(int i = j + l + 1; i < n; i++)                               a[i - l] = a[i];                       console.write("\na({0}): ",n-l);                       for (int i = 0; i < n - l; i++)                               console.write(" {0}",a[i]);                       console.readkey();               }       } }

Const     n = 13; var     a: array[1..n] of integer;     i: integer; begin randomize; for i: = 1 to n do       begin       a[i]: =random(21)-10;       write(a[i],' ')       end; writeln; i: =1; while i < = n do     begin     write(a[i],' ');     i: =i+2;     end; writeln; i: =2; while i < = n do     begin     write(a[i],' ');     i: =i+2;     end; end.