Если имеются ввиду среды программирования, то Basic, Pascal, Python. На счет Питона не уверен.
Дело в том, что в русском языке нет звука [я]. Букву я мы воспроизводим с помощью звуков [й],[а]. Поэтому само задание неверное.
Program MyProject;
{$APPTYPE CONSOLE}
var
p:int64;
a:integer;
i:2..10;
begin
a:=1+2;
p:=a;
i:=2;
while i<10 do begin
i:=i+1;
a:=a+i;
p:=p*a;
end;
Write(p)
end.
#include <iostream>
using namespace std;
int main()
{
setlocale(LC_ALL,"Russian");
int k=0,s=0,n;
cout<<"Введите размер массива: ";
cin>>n;
int a[n];
for (int i=0; i<n; i++) cin>>a[i];
cout<<"\nВведите K: ";
cin>>k;
for (int i=0; i<n; i++) if (a[i]%k==0) s+=a[i];
cout<<"\nСумма чисел кратных "<<k<<" = "<<s<<endl;
system("PAUSE");
}