Даны x, y, z. напишите программу для вычисления значения арифметического выражения

n = 2^i

n = 2^5 = 32

ответ. в классе 32 ученика

program zadacha2;

  uses crt;

  var i,n,a: integer;

            b,y,c,l: real;

begin

clrscr;

readln(n);

  a: =1;

  b: =2;

  c: =5;

  for i: =1 to n do                                                                                          

                                                                                                  begin  

if a mod 2 = 0 then

l: =a+b/c

else          

l: =a-b/c;

a: =a+1;

b: =b+2;

c: =c+5;

y: =y+l;

                                                                                                    end;

writeln(y: 2: 2);

readkey;

  end.

первую по подробней расспишите

var a,b,c: real;

begin

  read(a,b,c);

  if (a> b) and (b> c) then begin

      a: =a*2;

      b: =b*2;

      c: =c*2;

  end

  else begin

      a: =-a;

      b: =-b;

      c: =-c;

  end;

  writeln(a,b,c);

end.

y=x*x

y=y*y

y=y*y

y=y*x

y=y*x = x^10

y=x*x

y=y*y

y=y*y

y=y*y

y=y/x=x^15

y=x*x*x*x*x*x*x*x*x*x=x^10