Определить результат выполнения алгоритма по его блок-схеме для x=5, y=7, z=9.

нет ничего проще,   но где блок-схема? если там алгоритм сложения то конечный результат очевидно 21. если там сравнение то z> y> x , если там сортировка то по возрастанию - x,y,z , соответственно по убыванию z,y,x 

program xxx;

  var a, b, s, i : integer;

begin

  write('введите а-');

  readln (a);

  write('введите b-');

  readln (b);

  s: =0;   for i: = a to b do        s: =s + i * sqr(i);

    writeln ('сумма кубов =', s)

end.

program aaa;   var d, n : integer; begin  write ('введите число n-');   readln (n);   writeln('делители числа: ');   for d : =1 to n do  if n mod d = 0 then writeln (d)end.