Даны целые числа N (> 2), A и B. Сформировать и вывести целочисленный
массив размера N, первый элемент которого равен A, второй равен B, а
каждый последующий элемент равен сумме всех предыдущих.

//Линейное уравнение от одной переменной вида ax+b=0
procedure lin1(a,b: real; var x: real);
  begin
    x:=-b/a;
  end;

//Линейное уравнение двух переменных вида ax+by+c=0
//имеет бесконечное множество решений (корней)
procedure lin2(a,b,c: real);
  var x,y: real; 
  n,i: integer;
  begin
    write ('Сколько пар корней вы хотите получить? ');
    readln (n);
    for i:=1 to n do begin
      write ('Введите x=');
      read (x);
      y:=(-c-a*x)/b;
      writeln ('   y=',y);
    end;
  end;
  
var
  a,b,c,x,y: real;
  n: integer;
begin
  write ('Сколько переменных в уравнении - 1 или 2? ');
  readln (n);
  if n=1 
    then begin
      write ('Введите коэффициент при х: а=');
      readln (a);
      write ('Введите свободный коэффициент b=');
      readln (b);
      lin1(a,b,x);
      writeln ('x=',x);
    end
    else begin
      write ('Введите коэффициент при х: а=');
      readln (a);
      write ('Введите коэффициент при y: b=');
      readln (b);
      write ('Введите свободный коэффициент c=');
      readln (c);
      lin2(a,b,c);
    end;
end.
пример 1
Сколько переменных в уравнении - 1 или 2? 1
Введите коэффициент при х: а=3
Введите свободный коэффициент b=9
x=-3
пример 2
Сколько переменных в уравнении - 1 или 2? 2
Введите коэффициент при х: а=2
Введите коэффициент при y: b=2
Введите свободный коэффициент c=-4
Сколько пар корней вы хотите получить? 3
Введите x=0
   y=2
Введите x=2
   y=0
Введите x=-2
   y=4

1 набор текста;

2 вырезание кусков текста, запоминание их в течении текущего сеанса работы, а также в виде отдельных файлов;

3 вставка кусков в нужное место текста;

4 замена слов одно на другое частично или полностью по всему тексту;

5 нахождение в тексте нужных слов или предложений;

6 форматирование текста, т.е. придание ему определенного вида по следующим параметрам: ширина текстовой колонки, абзац, поля с обеих сторон, верхнее и нижнее поле, расстояние между строками, выравнивание края строк;

7 автоматическая разбивка текста на страницы с заданным числом строк;

8 автоматическая нумерация страниц;

9 автоматический ввод подзаголовков в нижней или верхней части страницы;

10 выделение части текста жирным, наклонным или подчеркнутым шрифтом;

11 переключение программы для работы с другим алфавитом;

12 табуляция строк, т.е. создание постоянных интервалов для представления текста в виде колонок;

13 при вводе текста вы упираетесь в конец строки, Word автоматически делает переход на следующую строку;

14 если при вводе текста делается опечатка, функция автокоррекции автоматически ее исправляет. А функция автоматической проверки орфографии подчеркивает неправильно написанные слова красной волнистой линией, чтобы их было легче увидеть и исправить;

15 если пользоваться дефисами для выделения пунктов списка, употреблять дроби, знак торговой марки или другие специальные символы, функция автоформатирования будет сама их корректировать;

16 возможность вставки в текст формул, таблиц, рисунков;

17 возможность создания нескольких текстовых колонок на одной страницы;

18 выбор готовых стилей и шаблонов;

19 для представления текста в виде таблицы можно, конечно, пользоваться и табулятором, однако Microsoft Word предлагает гораздо более эффективные средства. А если таблица содержит цифровые данные, то их легко превратить в диаграмму;

20 режим предварительного просмотра позволяет увидеть документ в том виде, в каком он выйдет из печати. Кроме того, он дает возможность отобразить сразу все страницы, что удобно для внесения изменений перед распечаткой.