1)Дан фрагмент электронной таблицы. В ячейку D2 введена формула= A2*B1+C1.
А В С D
1 5 2 4
2 10 1 6
В результате в ячейкеD2 появится значение:
6
14
16
24
2)Дан фрагмент электронной таблицы.
А В С
1 4 6 =А2+В2
2 =2*А1 =А2+В1 =С1*2+В2
Определите значение записанное в ячейке С2
32
47
58
120
3)Укажите правильный адрес ячейки:
А21С
12В
F256
В1А

Человек в своей деятельности постоянно создает и использует модели окружающего мира.
1. Модели позволяют представить в наглядной форме объекты и процессы, недоступные для непосредственного восприятия: Физика: модели двигателей; География: глобус – модель земли(реальный размер очень большой) ; Химия – модели кристаллическая решетка, молекул (реальные размеры очень маленькие); Биология – по муляжу человека изучаем внутреннее строение2. при  Проектировании механизмов и устройств, зданий, электрических цепей используют модели – чертежи и макеты. Математика – изучение объемных фигур3. Теоретические модели (для развития науки) – теории законов, гипотез и тд. Иногда создание таких моделей коренным образом меняет представления человека об окружаюжем мире: Коперник- гелиоцентрическая система мира, модель атома Резерфорда-Бора, геном человека)4. Художественное творчество - перенос реальной действительности на полотно, скульптура, театр, басня – отношения между животными – отношения между людьми

Const
  n = 15;

var
  x: array[1..n] of integer;
  i, b, s: integer;

begin
  Randomize;
  Writeln('Элементы массива');
  for i := 1 to n do
  begin
    x[i] := Random(50);
    Write(x[i]:3);
  end;
  Writeln;
  Write('Введите значение b -> '); Readln(b);
  s:=0;
  for i := 1 to n do if x[i]>b then s:=s+b;
  Writeln('Сумма элементов, больших ',b,', равна ',s)
end.

Тестовое решение:
Элементы массива
  8 46 29 23 21 14 14  8 20 26 15 49 44 35 33
Введите значение b -> 30
Сумма элементов, больших 30, равна 150

const
  n = 15;

var
  x: array[1..n] of integer;
  i, b: integer;

begin
  Randomize;
  Writeln('Элементы массива');
  for i := 1 to n do
  begin
    x[i] := Random(50);
    Write(x[i]:3);
  end;
  Writeln;
  Write('Введите значение b -> '); Readln(b);
  i:=1;
  while (x[i]<>b) and (i<n) do Inc(i);
  if x[i]=b then Writeln('x[',i,']=',b)
  else Writeln('Нет элементов со значением, равным ',b)
end.

Тестовое решение:
Элементы массива
 24  6 28 46 25  9 12 47 34  0 20 47 15 10 34
Введите значение b -> 20
x[11]=20