Проверить, является ли введенное слово палиндромом (перевертышем, то есть одинаково читается слева направо и наоборот пример палиндрома: казак. б) вывести число натуральных чисел-палиндромов от а до b. (а, b не превышают 10000).

1) var s: string;       i: integer;       f: boolean; begin   f: =false;   write ('s = ');   readln(s);   for i: =1 to length(s) div 2 do     if s[i]=s[length(s)-i+1] then f: =true else      begin       f: =false;       break;     end;   if f then writeln ('palindrom') else writeln ('not palindrom');   readln; end. 2) var a,b: integer;       count,j: integer; function palindr (n: integer): boolean; var s: string;       i: integer; begin   palindr: =false;   str (n,s);     for i: =1 to length(s) div 2 do            if s[i]=s[length(s)-i+1] then palindr: =true else           begin             palindr: =false;             break;           end; end; begin   write ('a = ');   readln(a);   write ('b = ');   readln(b);   count: =0;   for j: =a to b do     if palindr(j) then       begin         write (j,' ');         count: =count+1;       end;   writeln;   writeln ('kol-vo palindromov: ',count);   readln; end.

2000 Байтов.

Объяснение:

В алфавите 16 букв. Зная это информацию, мы можем воспользоватся формулой Хартли - N = 2^i, где N - мощность алфавита, а i - вес одного символа. 16 = 2^4. В задаче говорится, что все слова этого языка состоят из 5 букв. Выполнив обычные умножение, мы можем узнать вес одного слова в битах. 5 * 4 = 20 бит - вес одного слова. Далее просто вес одного слова умножим на их количество. 20 * 8000 = 160000. Нас просят  выразить информацию в Байтах, поэтому получившееся число разделим на 8, т.к. в одном Байте восемь бит информации. 160000 : 8 = 20000 Байтов - вес всех слов, составленных из букв алфавита.

  решений существует два

1) суммирование ряда, предусмотрев что сщгтеук будет большим

counter : = 0;

for(i: =1213, i< =1210113; i++)

  counter : = counter+i;

 

 

2) вывод формулы как известно суммой ряда натуральных чисел можно считать n(n+1)/2, следовательно, частичной суммой рядо соответственно будет n(n+1)/2-k(k+1)/2+k, и применительно к нашей

605057*1210113 - 607*1213 + 1213 =  732186606363

 

преобразование к 5 системе счисления не имеет никаких проблем, делим на 5 записываем остаток, и так пока число не кончится, остатки в обратном порядке и будут искомым числом

т.е.  43444004232400423