, нужно написать текст программу в Паскаль Вычисление скалярного произведения
14) s=(A(p+r+q),p) - условие

Исходные данные:

A= 1 2 3
1 2 1
3 2 0

B= 4 1 2
0 4 3
1 1 1

P= 0.1
1.7
-1.5

q= -1.6
0.8
1.1

r= -0.7
1.3
0.2

Var a,max,sum:integer;
    arr:array [0..2015] of integer;
    begin
randomize;
max:=-500;
sum:=0;
for a:=0 to 2015 do begin
arr[a]:=random(1001)-500;
if max<arr[a] then max:=arr[a];
end;
write('максимальный элемент массива ==> ',max);
writeln();

if max mod 2 = 1 then begin
for a:=0 to 2015 do begin
if arr[a] mod 2 =1 then sum:=sum+arr[a];
end;
writeln('сумма чисел одинаковой чётности числу ',max,' = ',sum);
end;

sum:=0;
if max mod 2 = 0 then begin
for a:=0 to 2015 do begin
if arr[a] mod 2 =0 then sum:=sum+arr[a];
end;
writeln('сумма чисел одинаковой чётности числу ',max,' = ',sum);
end;

end.

Моделирование — это метод познания, состоящий в создании и исследовании моделей.

Модель создается для того, чтобы: представить объект, воспроизвести его внешний вид и характерные особенности; понять, как устроен конкретный объект, какова его структура, основные свойства, законы развития и взаимодействия с окружающим миром; ... прогнозировать последствия воздействия на объект и т.

Вербальная модель - информационная модель в мысленной или разговорной форме. Знаковая модель - информационная модель, выраженная специальными знаками, то есть средствами любого формального языка. Математическая модель – система математических соотношений, описывающих процесс или явлени