Вычислить сумму х+x^3/3+x^5/+x^11/11,x вводится с клавиатуры.(в 3 цыклах )

1. var x,a,s: real; i: integer; begin write('x = '); readln(x); a: =x; s: =x; i: =1; while i< 11 do   begin   i: =i+2;   a: =x*x*a;   s: =a/i;   end; writeln('s = ',s); end. 2. var x,a,s: real; i: integer; begin write('x = '); readln(x); a: =x; s: =x; i: =1; repeat   i: =i+2;   a: =x*x*a;   s: =a/i; until i=11; writeln('s = ',s); end. 3. var x,a,s: real; i: integer; begin   write('x = '); readln(x); a: =x; s: =x; for i: =1 to 11 div 2 do   begin   a: =x*x*a;   s: =a/(2*i+1);   end; writeln('s = ',s); end. пример: x = 3 s = 16104.2727272727

program xxx;

  var a, b, s : real;

              r, p, d : real;

begin

    write ('введите певрое число- ');

    readln (a);

    write ('введите второе число- ');

    readln (b);

    s: = a+ b;

    r : = a - b;

    p : = a* b;

    d : = a/b;

    writeln ('сумма =', s);

    writeln ('разность =', r);

    writeln ('произведение =', p);

    writeln ('частное = ', d);

    readln

end.

текст: happy new year, dear содержит 30 символов. при кодировании текста с acsii каждый символ кодиреутся 8 битами или 1 байтом, следовательно

30 символов = 30 байт или  30 * 8 = 240 бит