По представленной блок-схеме составить программу и получите результат ее выполнения - Turbo Pascal

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

Ребята помогите плиз с задачкой по Turbo Pascal: По представленной блок-схеме составить программу и получите результат ее выполнения Отладьте программу на следующем примере:

a	b	c	y
17	-2	3	0.0552551

Решение задачи: «По представленной блок-схеме составить программу и получите результат ее выполнения»

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

var
  a, b, c: integer;
  s, k, y: real;
begin
  read(a, b, c);
  s := sqrt(2 * a + b * b * b) / (3 * c * c * c * c);
  k := 2 * s - sqrt(abs(a * b * c));
  y := s + k - (5 * s / (b + c));
  writeln(y);
end.

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

Ввод значений переменных a, b и c с помощью функции read.
Вычисление значения переменной s по формуле: s := sqrt(2a + bbb) / (3ccc*c).
Вычисление значения переменной k по формуле: k := 2s - sqrt(abs(ab*c)).
Вычисление значения переменной y по формуле: y := s + k - (5*s / (b+c)).
Вывод значения переменной y с помощью функции writeln.