Разветвляющийся вычислительный процесс.
Вариант № 3

Приложения:

Ответы

Ответ дал: HRAshton
0
var
  x: real;

begin
  write('x = ');
  readln(x);
  write('y = ');
  if x < 1 then
    writeln(2 * x - 17)
  else
    if (x <= 5) then
      writeln(power(x, 7))
    else
      writeln(x * ln(x));
end.
Вас заинтересует