Лида составляет слова из букв К, Р, Ы, Ш, А. Каждая гласная буква встречается в слове не более двух раз. Каждая согласная может стоять в слове на первой позиции, либо не встречаться вовсе. Сколько слов длиною более двух символов может составить Лида? НА ПИТОНЕ
СОСТАВИТЬ ПРОГРАММУ

from itertools import *

m = 0

p = 0

for i in range(2,5):

n = 0

word = product('ИА',repeat=i) ## i -это кол-во символов в слове

for letter in word:

if letter.count('И') <3 and letter.count('А') <3:

n += 1 ##кол-во слов, где каждая гласная встречается не более двух раз

if i !=2:

p +=n ## кол-во слов длиной более двух символов без согласных

m+=n*2 ## кол-во слов длиной более двух символов с 2мя согласными вначале слова

print(m+p)

var i: integer;

begin

for i: =1 to 1000 do

if (i mod 3=0) or (i mod 7=0) then write(i);

end.

на каком языке нужна программа?   пример на paskal:   program zadacha;   var massiv: array [1..15] of integer; i: byte; massiv2: array [1..15] of real;   begin  randomize;   write('isxodnij massiv: ');   for i: =1 to 15 do  begin  massiv: =random(41)-20;   write(massiv,' ');   end;   writeln;   writeln('massiv posle preobrazovanij: ');   for i: =1 to 15 do  begin  if massiv=0 then massiv2: =massiv  else  if massiv mod 5 = 0 then massiv2: =massiv*2  else begin  massiv2: =massiv;   massiv2: =massiv2/2;   end;   write(massiv2: 0: 1,' ');   end;   readln;   end.