Question

Дана программа на языке 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. Какой ответ будет выведен на экран? - вопрос

Answer 1

Сделаем трассировку:
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