Задача по информатике

Не проблема, только неплохо было бы назвать при этом язык программирования. Ибо их (языков программирования существует более 40). Нет, программе-то без разницы, на каком языке программирования она написана, а вот учитель/преподаватель может спросить, а с чего это программа написана на этом языке программирования, а не на том. который он(а) преподает.Вот, например, на Паскале (Pascal): Program P1; uses crt; const n=15; type massiv=array [1..n] of integer; var i, k, s: integer; m: massiv; sr: real; begin clrscr; k:=0; s:=0; for i:=1 to n do m[i]:=random (101)+50; write ('Был сгенерирован массив:'); for i:=1 to n do write (' ', m[i]); writeln (' '); for i:=1 to n do begin if m[i] mod 3=0 then begin k:=k+1; s:=s+m[i]; end; end; sr:=s/k; writeln ('Среднее значение элементов массива, кратных 3, составляет: ', sr); write ('Программа завершена. Для выхода нажмите клавишу Enter.'); readkey; end.