Написать программу в паскале. Дана строка из слов, разделенных пробелами.Удалить лишные пробелыПробел считается лишным, если он стоит в начале строки, в конце строки или следует за пробелом​

Сам написал, сам же и пояснять буду :D

def convert_to_oct(dec_integer): #Обявляем функцию с именем _convert_to_oct_, принимающую 1 аргумент, в теле функции именованый как dec_integer (десятичное_целое)

   return oct(dec_integer)[2::] #Возвращаем восьмиричную запись десятичного числа, переданного функции. Т.к восьмиричное число в python храниться как строка, сделаем срез, убрав первые 2 символа, в которых указана СС. (пример: oct(какое_то_десятичное) -> 0o456. А нам нужно только само число - 456)

print(convert_to_oct(int(input( #Печатаем возвращённое функцией значение. В качестве аргумента к функции улетает целое десятичное число, считываемое с клавиатуры

Объяснение:

Еще на всякий случай прикреплю исходник на языке Pascal:

const n = 10;

var mat: array [1..n, 1..n] of integer;

sum, count: array [1..n] of integer;

begin

   for var i:=1 to n do

       for var j:=1 to n do

           mat[i, j] := random(-10, 30);

           

   writeln('Matrix: ');

   for var i:=1 to n do

   begin

       for var j:=1 to n do

           write(mat[i, j]:4);

       writeln();

   end;

   writeln();

   

   for var i:=1 to n do

       for var j:=1 to n do

           if mat[i, j] > 0 then

           begin

               sum[j] += mat[i,j];

               count[j] += 1;

           end;

   writeln('Sum:');

   for var i:=1 to n do

        write(sum[i]:4);

   writeln();

   writeln('Positive count:');

   for var i:=1 to n do

       write(count[i]:4);

   writeln();

end.