пОДРОБНОЕ РЕШЕНИЕ! У Маши имеется некоторая информация, которую необходимо закодировать. Процесс кодирования нужно осуществить при пятибуквенного алфавита {А, В, С, D, Е}. Вычислите, сколько существует различных последовательностей из восьми символов указанного алфавита, которые содержат три буквы А.

сумму чисел один,два,три,четыре,пять разделить на разность чисел 10 и 7.равно пяти.

  var a,b,c,d: integer;

begin

writeln ('vvedite a');

  read(a);

writeln ('vvedite b');

  read(b);

writeln ('vvedite c');

  read(c);

writeln ('vvedite d');

  read(d);

if (a> b) and (a> c) and (a> d)  then writeln('samoe bolshoe chislo - a')

  else writeln('a ne samoe bolshoe');

end.

20 - 25 = -5

-5 в десятичной системе

read(n);

s = str(n);

n1 : = int(s[1]);

n2 : = int(s[2]);

n3 : = int(s[3]);

if (n1+n2+n3) mod 2 = 0 then writeln("сумма чисел четная")