Один из самых простых 1221 (7+3*2*2+3)=43
A:=20; //a=20
b:=3; //b=3
b:=a div b; { a div b, это целая часть от деления А на B, есть от деления 20 на 3
20 / 3 = 6 (2), 20 div 3 = 6(т.к. 18 / 6 = 3). b = 3}
c:=a mod (b+1); { A mod B, это остаток от деления A на B, 20 mod (3+1) = 20 mod 4 = 0 (т.к. 20 нацело делится на 4, целая часть от деления = 5) }
C = 0
a:=28; // a=28
b:=7; // b=7
b:= a mod b; { 28 mod 7 = 0, т.к 28 без остатка делится на 7, 28 div 7 = 4 (7*4=28) b=0}
c:=a div (b+1); // a div (b+1) = 28 div 1 = 28
C = 28
Const N=10;
var a:array [1..N] of integer;
i,sum:integer;
sr:real;
begin
sr:=0; sum:=0;
for i:=1 to N do
begin
a[i]:=random(10)+1;
sum:=sum+a[i];
end;
for i:=1 to N do
write(a[i]:3);
writeln;
sr:=sum/10;
writeln('Среднее значение элементов массива:',sr);
end.