Вiдповiсти на питання: чи потрібно архівувати дані для пересилання їх електронною поштою? які саме і в яких випадках? чи можна пересилати електронною поштою веб-сторінку? чи варто це робити ? як роздрукувати лист, що містить вкладені файли? чи можливо це зробити, не розкриваючи вкладені файли? чи з кожної поштової скриньки можна відправити відеофайл? чи доцільно пересилати фільми електронною поштою?

Для начала переведем всё числа в десятеричную систему счисления: m=33257(10) l = 97a(16) =   9 * 16^2 + 7 * 16^1 + a * 16^0 = 9 * 256 + 7 * 16 + 10 * 1 = 2304 + 112 + 10 = 2426(10) t = 76705(8) = 7 * 8^4 + 6 * 8^3 + 7 * 8^2 + 0 * 8^1 + 5 * 8^0 = 7 * 4096 + 6 * 512 + 7 * 64 + 5 * 1 =  28672 + 3072 + 448 + 5 =  32197(10) p = fb01(16) = f * 16^3 + b * 16^2 + 0 * 16^1 + 1 * 16^0 = 15 *  4096 + 11 * 256 + 1 =  61440 +  2816 + 1 =  64257(10) k =  1  0000  0000  0011  0101(2) = 1 * 2^16 + 0 * 2^15 + + 0 * 2^6 + 1 * 2^5 + 1 * 2^4 + 0 * 2^3 + 1 * 2^2 + 0 * 2^1 + 1 * 2^0 =  65536 + 32 + 16 +   4 + 1 =  65589(10) теперь подставим числа в формулу и получим результат: m + 9l - k - 2t + p =  33257 + 9 *  2426 -  65589 - 2 *  32197 +  64257 =  33257  +  21834 - 65589 -  64394 +  64257  =  -10635 ответ:   -10635p.s. у вас t тоже самое, что p. так и должно быть?

Program task; var i,n,k: longint; begin      writeln('n? ');       readln(n);       writeln('k? ');       readln(k);       for i: =1 to n*k do begin        if ((i mod n = 0) and (i mod k = 0)) then begin          writeln(i);           break;         end;       end;       readln; end.