1. Получить представление числа 157 в формате целого числа без знака. 2. Получить представление числа -123 в формате целого числа со знаком.

Pascal алгоритм1   var    s : string;     n1,n2 : integer;     i,l : integer;   begin  readln (s);       n1 : = 0;   n2 : = 0;   l : = length(s);     for i : = 1 to l do    if (s[i] = ' ') then      if n1 = 0 then      n1 : = i      else      n2 : = i;       if n2 = 0 then    s : = ' '  else    s : = copy(s,n1+1,n2-n1-1);       writeln (s);   end.алгоритм2  var    s : string;     n1,n2 : integer;     i,l : integer;     r : boolean;   begin  readln (s);       n1 : = 0;   n2 : = 0;   r : = false;   l : = length(s);   i : = 1;       while (i< =l) and (not r) do    begin      if s[i] = ' ' then      begin        n1 : = i;         r : = true;       end;     i : = i +1;     end;           r : =false;   i : = l;       while (i> 0) and (not r) do    begin    if s[i] = ' ' then      begin      n2 : = i;       r : = true;       end;     i : = i -1;     end;       if n2 = n1 then    s : = ' '  else    s : = copy(s,n1+1,n2-n1-1);       writeln (s);   end.