Составить программу в паскале. Протабулировать функцию Y=cosx+6x, если x принадлежит интервалу (0,1;2) с шагом 0,2.

Для решения данной задачи на языке Паскаль, вам необходимо написать программу, которая будет вычислять значения функции $Y = \cos(x) + 6x$ для значений $x$, принадлежащих интервалу от 0 до 2 с шагом 0.2.

Программа должна:

1. Проходить по значениям $x$, начиная с 0 и заканчивая 2, с шагом 0.2.
2. Для каждого значения $x$ вычислять соответствующее значение функции.
3. Выводить результаты в удобочитаемом виде.

Пример программы на языке Паскаль:

pascal
program Tabulation;
uses
  Math;  { Модуль для математических функций, включая cos }
var
  x, y: Real;
begin
  { Начинаем с x = 0, и будем увеличивать x на 0.2 до 2 }
  x := 0;
  while x <= 2 do
  begin
    { Вычисляем значение функции Y = cos(x) + 6x }
    y := cos(x) + 6 * x;
    
    { Выводим результат с точностью до 4 знаков после запятой }
    WriteLn('x = ', x:0:1, ', Y = ', y:0:4);
    { Увеличиваем x на 0.2 }
    x := x + 0.2;
  end;
end.

Объяснение работы программы:

1. Использование модуля Math: Для работы с функцией $\cos(x)$ необходимо подключить модуль Math, который содержит стандартные математические функции.
2. Переменные:
   • x: переменная для хранения текущего значения $x$, начинающаяся с 0.
   • y: переменная для хранения вычисленного значения функции для соответствующего $x$.
3. Цикл while: Цикл выполняется до тех пор, пока значение $x$ не превысит 2. В каждом цикле значение $x$ увеличивается на 0.2.
4. Вывод результатов: Для каждого значения $x$ программа выводит соответствующее значение $y$, используя форматированный вывод с точностью до 4 знаков после запятой.

Пример вывода программы:

makefile
x = 0.0, Y = 6.0000
x = 0.2, Y = 6.1980
x = 0.4, Y = 6.3935
x = 0.6, Y = 6.5857
x = 0.8, Y = 6.7748
x = 1.0, Y = 6.9600
x = 1.2, Y = 7.1426
x = 1.4, Y = 7.3223
x = 1.6, Y = 7.4993
x = 1.8, Y = 7.6736
x = 2.0, Y = 7.8454

Таким образом, программа корректно табулирует значения функции на заданном интервале с шагом 0.2.