Pascalabc. net напишите программу, которая вычисляет арифметическое выражение, введённое в виде символьной строки. выражение содержит только целые числа и знаки сложения. входные данные входная строка содержит запись арифметического выражения. выходные данные программа должна вывести результат вычисления переданного ей выражения. примеры входные данные 12+32+43+5 выходные данные 92

// pascalabc.net 3.2, сборка 1417 от 28.03.2017 // внимание! если программа не работает, обновите версию! begin   // без проверок на правильность   var st: =readlnstring;   var p: =st.matchvalues('(\d+)').select(x-> x.tobiginteger);   var s: =biginteger(0);   foreach var n in p do s+=n;   writeln(s) end. примеры 12+32+43+5 92 123424634243542+36745656856678567578654+434253+3222+322523230 36745656980103524782901

program xxx;

    var i, n : integer;

              a, s : real;

                    b : array [1..20] of real;

begin

  writeln('введите число а=');

  readln(a);

  writeln('введите размерность массива n=');

  readln(n);

  write('введите элементы массива b: ');

  for i: =1 to n do

        readln(b[i]);

  writeln('исходный массив b: ');

  for i: =1 to n do

        writeln(b[i]);

  s: =0;

  for i: =1 to n do

      if b[i] > a then s: =s+b[i];

  writeln('сумма элементов =', s);

  readln

end.

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

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