Написать результат выполнения алгоритма с указанными
входными данными
x=1

вывод 0,46825 (15/32)

Объяснение:

разберём по действиям

начало

ввод х=1

присваиваем z=1 и i=0

переприсваиваем z = (1+1/2)/2 = 0,75

i = 0+1=1

1<4 (+)

переприсваиваем z = (0,75+1/2)/2 = 0,625

i = 1+1 = 2

2<4 (+)

переприсваиваем z = (0,625+1/2)/2 = 0,5625

i = 2+1 = 3

3<4 (+)

переприсваиваем z = (0,5625+1/2)/2 = 0,46825

i = 3+1 = 4

4<4 (-)

вывод 0,46825 (15/32)

конец

P.S. если не жалко дайте лучший ответ

program xxx;

  var i, n, s : integer;

begin

    write('введите число n=');

    readln(n);

    s: =0;

    i: =2;

    while i< =n do

        begin

          s: =s+i;

            i: =i+2

        end;

    write('сумма четных чисел =', s);

    readln

end.

var

  n,i,a: integer;

begin

  readln(n);

  for i: =1 to n do

  begin

  read(a);

  write(abs(a),' ');

end;

end.