Прикладное программное обеспечение! Так же к этому типу относятся:Офисные программы, мультимедиа, графика и дизайн, безопасность, игры и развлечения, интернет и сети.
Ответ:Ммм... Паскаль) Для этого сайты есть.
Объяснение:
Program z1;
var A:array[1..30] of integer;
i,k:integer;
begin
k:=1;
for i:=1 to 30 do begin
write('a[',i,']=');
read(a[i]);
end;
for i:=1 to 30 do
if a[i] mod 2=0 then
k:=a[i]*k;
writeln(k);
end.
Ответа на вопрос не последовало. Поэтому привожу решение в пакете Maple 15 (см. вложение)
А экстремумов у этой функции нет...