найти ошибку по инфе, заранее з

Объяснение:

в предпоследней строке

там должно быть не if r[i]=2  там должно быть

if r[i] mod 2 = 0

Посилання, яке модифікується під час копіювання формули, називають відносним.

Посилання, яке не модифікується під час копіювання формули, називають абсолютним.

Для того щоб посилання було абсолютним, потрібно перед номером стовпця та перед номером рядка ввести символ $.

Наприклад, посилання В10 є відносним, а посилання $В$10 - абсолютним.

Розглянемо приклад, який пояснює доцільність використання абсолютних посилань.

Нехай у клітинках діапазону С3:С7 (мал. 7.1) міститься кількість відмінників у п’яти 8-10-х класах школи, а в клітинці С8 обчислена їх загальна кількість. У клітинках діапазону 03:07 потрібно обчислити відсоток відмінників у кожному із цих класів по відношенню до загальної кількості відмінників.

 

Для обчислення цих відсотків у клітинках діапазону 03:07 повинні знаходитися такі формули:

03    = С3/С8*100

04    = С4/С8*100

05    = С5/С8*100

06    = С6/С8*100

07    = С7/С8*100

Якщо проаналізувати всі ці формули, то можна зробити висновок, що посилання в чисельнику змінюються,

а посилання у знаменнику - ні. Якщо ми введемо в клітинку Б3 формулу =С3/С8*100 і скопіюємо її в клітинки діапазону Б4:Б7, то ці посилання у формулі будуть модифікуватися.

Объяснение:

Задача 1:

const N = 15;

const MAX = 15;

const MIN = -15;

var A: array [1..N] of integer;

var i,s1,s2: integer;

begin

randomize();

s1:=0;

s2:=0;

writeln('Исходный массив: ');

for i:=1 to N do

 begin

 A[i]:=random(MAX-MIN+1)+MIN;

 write(A[i],' ');

 if (A[i]<0) then s1:=s1+A[i];

 if (A[i] mod 3 = 0) then s2:=s2+A[i];

 end;

writeln();

writeln('Сумма всех отрицательных элементов: ',s1);

writeln('Сумма всех элементов, кратных 3: ',s2);

end.

Задача 2:

const N = 20;

const MAX = 33;

const MIN = -15;

var A: array [1..N] of integer;

var i,imax,imin: integer;

begin

randomize();

imin:=1;

imax:=1;

writeln('Исходный массив: ');

for i:=1 to N do

 begin

 A[i]:=random(MAX-MIN+1)+MIN;

 write(A[i],' ');

 if (A[i]<A[imin]) then imin:=i;

 if (A[i]>A[imax]) then imax:=i;

 end;

writeln();

writeln('Номер минимального элемента массива: ',imin);

writeln('Номер максимального элемента массива: ',imax);

end.