Дана программа на языке 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.

Какой ответ будет выведен на экран? - вопрос

Question

Информатика

Петя

20 сентября, 12:38

Дана программа на языке 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.

Какой ответ будет выведен на экран? - вопрос

+5

Ответы (1)

Знаете ответ на вопрос?

Васа · 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

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

Дана программа на языке 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.

Какой ответ будет выведен на экран? - вопрос