Дана программа на языке pascal: var z, x: real; i: integer; begin; z=1; i=0; x=128; repeat z: = z + x/2; i: = i+1; x: =x/2; intil (i=4); write (z); end. какой ответ будет выведен на экран? - вопрос

Сделаем трассировку:
x = 128 z = 1;i=0
z = 1 + 64; x = 128/2; i = 1;
z = 65 + 32; x = 64/2; i = 2;
z = 97 + 16; x = 32/2; i = 3;
z = 113 + 8; x = 16/2 ; i = 4
Конец
z = 121