Всем привет, мой предмет: Алгоритмы, структуры данных и программирование. , нужно выполнить это задание(прикрепляю фотографию). Вот код примера как это должно выглядеть: program melhi;vara, b, c, k, r, x, y: real;beginwrite('y, k, x =? ');readln(y, k, x);if y <> 0 then a := sqr(sin((k - 5) / y))else a := 0; b := x + y; c := k - y;if (a <> 0) and (b >= 0) and (c >= 0) thenbegin if b > 0 then b := exp(ln(b) / 6); b := b + exp(4 * k + 1); c := 5. 6e8 * x + sqrt(c); r := (c - b) / a; writeln('r = ', r) endelse writeln('Значение выражения не определено')end. Прошу посчитайте, Я буду очень благодарен вам.