Дана программа. Каков будет результат на выходе, если y=47, a x=25? Program Z1; Var X,Y,Z: integer; Begin Write(`Введите два числа `); Readln(X,Y); Z:=(X-Y)/2; Write(Z); End.