Некоторый алгоритм из одной цепочки символов получает новую цепочку символов следующим образом:
1) Записывается исходная цепочка символов в исходном порядке;
2) Записывается исходная цепочка символов в обратном порядке;
3) Записывается буква, следующая в русском алфавите за той, которая в исходной цепочке стояла на первом месте.
Получившаяся таким образом цепочка является результатом работы алгоритма.
Дана цепочка символов СУ. Какая цепочка символов получится, если к данной цепочке применить описанный алгоритм дважды?

program xxx;

    var i, k, d, e, s : integer;

begin

  k: =0;

  for i: = 10 to 99 do

    begin

          d: = i div 10;

          e: = i mod 10;

          s: =d + e;

          if i mod s = 0 then k: =k+1

    end;

    write ('кол-во чисел которые делятся на сумму своих цифр=', k);

    readln

end.

вот проверила, так работает. нормально?

program maxmin; var    a, b, c: integer;     max, min: integer; beginwriteln('введите три числа.'); read(a,b,c); {вводи числа через пробел}max: =a; if(b> max) then max: =b; if(c> max) then max: =c; min: =a; if(b< min) then min: =b; if(c< min) then min: =c; writeln('разность наибольшего и наименьшего чисел равна ',max-min); end.

а)сумм(a5: b7)

б)срзнач(c4: c7)

include < iostream>

using namespace std;

int main()

{int n;

  cin > > n;

switch(n)

        {case 1: cout< < "i"; break;

          case 5: cout< < "v"; break;

          case 10: cout< < "x"; break;

          case 50: cout< < "l"; break;

          case 100: cout< < "c"; break;

          case 500: cout< < "d"; break;

          case 1000: cout< < "m"; break;

        }

return 0;

}