16. Составить алгоритм и написать решение задачи на Паскале: Вычислить формулу с фотографии, где х - произвольное число, введенное пользователем с клавиатуры.

Формула y=(2x-17√(x-7))/|3x-12| Программа Program y var x, y: real BEGIN write ('Vvedite x'); readln (x); y=(2*x-17*sqrt(x-7))/abs(3*x-12); writeln ("y = ", y); END.

[latex]y=\frac{2x-17\sqrt{x-7}}{|3x-12|}=\frac{2x-17\sqrt{x-7}}{3x-12}[/latex] ОДЗ корня: [latex]x\geq7[/latex], так что [latex]x\ \textless \ 4[/latex] в модуле получится не может, преобразовав его в [latex]12-3x[/latex].  Программа:  program apsojfskd;  var x:integer; a, b, c:real;  beginreadln (x); a:=2*x-17*sqrt(x-7);  b:=3*x-12;  if x > 4 then b:=3*x-12;  if x < 4 then b:=12-3*x;  c:=a/b;  writeln (c);  end.  Строки с if убрать можно в принципе, но я сделал это для вида, типа модуль в выражении присутствует.