Составьте программу построения десяти прямоугольни- ков, размеры, цвет и место расположения которых выбираются слу-
чайным образом. Результат работы программы может быть такой,
как показано на рисунке.

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

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

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

Наприклад, посилання В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, то ці посилання у формулі будуть модифікуватися.

Объяснение:

Const 
n=5;

Var
 ar:array[1..n] of integer;
 ar2:array[1..n] of integer;
 i,k:integer;

 function prost(a:integer):boolean;
 var i:integer;
 b:boolean;
  begin
  b:=true;
   for i:=2 to a div 2 do
    if a mod i=0 then
     begin;
      b:=false;
      break;
     end;
   if a=1 then b:=false;
  prost:=b;
 end;

  begin;
 randomize;
 k:=0;
  for i:=1 to n do
   begin;
    ar[i]:=random(101);
    write(ar[i]:4);
   end;
  writeln;
  for i:=1 to n do
  if prost(ar[i]) then
   begin;
    inc(k);
    ar2[k]:=ar[i];
    write(ar2[k]:4);
   end;
end.