Виктор составляет 4х буквенные коды из букв а р с е н и й. каждую букву можно использовать сколько угодно раз, код не может начинаться с й и должен содержать хотя бы одну гласную. сколько различных кодов может составить виктор​

(см. объяснение)

Объяснение:

Напишем программу на языке программирования PascalABC.NET:

##

var s: string := 'АЕИЙНРС';

var a,b,c,d: char;

var k: integer := 0;

foreach a in s do

 foreach b in s do

   foreach c in s do

     foreach d in s do

       if((a<>'Й') and ((a+b+c+d).Count(x->x='А')+(a+b+c+d).Count(x->x='Е')+(a+b+c+d).Count(x->x='И')>0))

         then k:= k+1;

print(k);

Задание выполнено!