Здравствуйте! Хотел бы попросить опытных программистов на мне. 1.Создайте функцию, которая форматирует введенную строку, выравнивая ее по центру указанного количества символов, и с обоих
боков заполняет пробелы указанным знаком.
Структура функции:
def corrector(string, width, symbol):
pass
2.Создайте функцию, в которую после вызова пользователь вводит
наибольшее и наименьшее значение, а возвращается случайное
число из заданного диапазона Выведите на экран это число.

program xxx;

    var i, n : integer;

                a, d : real

                      s: array[1..20] of real;

begin

    write('введите n-');

    readln (n);

    write('введите а=');

    readln(a);

    write('введите d=');

    readln(d);

    s[1]: =a;

    for i: =2 to n do

        s[i]: =a+d;

    write('арифметическая прогрессия: ');  

    for i: =1 to n do

              write(s[i]);

end.

число-общее

столица росси - единичное

учебник - общее

житель москвы - общее

столица - общее

самая высокая гора - единичное

пушкин - единичное

сказочный персонаж - общее

баба яга- единичное

var 

i,n: integer;

begin

readln(n);

for i: =1 to n-1 do write(i*i: 5);

end.

одна из возможных форм курсора - прямая