Решить (табличным Даша, Олеся и Валя играли во дворе в мячик. Одна из девочек кинула мяч вы-

соко и попала в окно тёте Зине, которая была знакома со всеми девочками. Ко-

гда она спросила, кто из них кинул мяч в окно, все ответили по-разному: Даша

сказала: «Это была не Валя. Это была Олеся». Олеся сказала: «Это была Даша.

Это была не я». Валя сказала: «Это была не я. Это была Олеся». Но тётя Зина

точно знала, что одна из девочек два раза сказала правду, другая – один раз

правду, а второй ложь, а третья – оба раза обманула. Вопрос: Кто разбил окно?

Кто оба раз сказал ложь?

​

Program Project1;

var m:array [0..14] of integer; i:integer;

function IsPositive(a:integer):boolean;
begin
  result:=(a>-1);
end;

procedure work;
var min, max, count:integer;
begin
  count:=0;
  min:=m[0];
  max:=0;
  for i:=0 to 14 do begin
    if IsPositive(m[i]) then begin
      inc(count);
      if m[i]>max then max:=m[i];
      if m[i]<min then min:=m[i];
    end;
  end;
  writeln('MAX: ', max);
  writeln('MIN: ', min);
  writeln('Count: ', count);
end;

begin
  for i:=0 to 14 do begin
    write('n: ');
    readln(m[i]);
  end;

  work;

  readln;
end.

Когда мы копируем рисунок в буфер, то он определенного размера.
Создадим второго слона. Для этого надо выполнить все 4 команды:
1,2,3,4.
Второй слон стал на 80% меньше первого.
Создадим третьего слона.
Если мы сейчас снова вставим слона из буфера (команда 3), то вставится первый слон, и команду 4 придется делать 2 раза, чтобы он стал на 80% меньше, чем второй слон.
Поэтому для третьего слона нужно выделить второго и опять проделать все 4 команды: 1,2,3,4.
Чтобы получить еще 6 слонов, нужно эти команды повторить 6 раз.
ответ: В) повторить (1,2,3,4; 6)