1) 7; 6; 9; 8 ; 11; 10; 13; 12; 15; 14 - тут сначала отнимаем 1. Потом прибавляем 3.
2) 2; 3; 5; 7; 8; 10; 12; 13; 15; 17 - тут сначала прибавляем 1. Потом прибавляем 2. А потом еще раз 2.
Протокол передачи данных, TCP/IP
uses crt;
type matr=array[1..20,1..20] of integer;
proc=procedure(m:matr;n:byte);
Var a,b,c: integer;
begin
readln(c);
c:=a+b;
writeln(c);
end.