Написать программу вычисления функции - Pascal (80168)

Формулировка задачи:

ребята на екзамен срочно нужно помогите Написать программу вычисления функции при a=2; b=0.5; c=-4. Аргумент x принимает значения от 1 до 10 с шагом 1.

Решение задачи: «Написать программу вычисления функции»

Листинг программы

var
  a, b, c, y: real;
  x: integer;
 
begin
  a := 2;
  b := 0.5;
  c := -4;
  for x := 1 to 10 do
  begin
    y := 2 * a * x - 3 * b * sqrt(2 * c + 3 * a * x);
    writeln('X: ', x:8, ', Y: ', y:8:2);
  end;
end.

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

Объявление переменных:
- a - значение типа real, равное 2
- b - значение типа real, равное 0.5
- c - значение типа real, равное -4
- y - значение типа real
- x - значение типа integer
Начало цикла:
- Инициализация переменной x значением 1
- Начало цикла, который будет выполняться от 1 до 10
Вычисление значения y:
- Значение y вычисляется по формуле: y = 2 a x - 3 b sqrt(2 c + 3 a * x), где a, b, c, и x - значения переменных, а sqrt - функция извлечения квадратного корня
- Вывод пары значений X и Y на экран с помощью функции writeln