Задан массив, где нужно самому ввести его границы и размер. Заполнить рандомными цифрами и:

1) посчитать среднее арифметическое всех элементов массива

2) вывести все индексы чётных элементов массива
10 класс, питон

// PascalABC.NET 3.2, сборка 1379 от 21.01.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var a:=ArrRandom(7,1,99);
  var b:=ArrRandom(7,1,99);
  var c:=ArrRandom(7,1,2);
  var k:=0;
  var r,x:integer;
  for var i:=0 to 6 do begin
    Write(a[i]);
    if c[i]=1 then begin Write(' + '); r:=a[i]+b[i] end
    else begin Write(' - '); r:=a[i]-b[i] end;
    Write(b[i],' = '); Read(x);
    if x=r then k+=1
    end; // for
  Writeln('Верных ответов: ',k)
end.

Пример
77 - 21 = 56
53 - 97 = -44
91 + 51 = 142
42 - 65 = -23
70 + 78 = 148
91 - 5 = 86
45 + 41 = 86
Верных ответов: 7

1) Дискретность - алгоритм должен состоять из отдельных пунктов.
2) Понятность - каждая команда должна быть понятна исполнителю.
3) Результативность - алгоритм должен приводить к заранее продуманному результату.
4) Массовость - он должен решать не одну задачу, а круг таких задач.
5) Определенность - не должно быть команд, которые исполнитель воспримит неоднозначно.

Н-р:
1) 1. Повернуть направо.
    2. Пройти 2 шага.
    3. Повернуть налево.
2) Не должно быть таких команд:
    1. Пройти 2 шага
    2. Зачикиниться
3) К примеру, рецепт бутерброда приведет тебя к готовому бутеру (если, конечно, ты поборишь свою лень и встанешь, чтобы приготовить его)
4) Н-р, формула расчета притяжения между телами должна быть ориентирована на различные тела, а не на, к примеру, только Землю и Луну.
5) Не должно быть, н-р, таких команд:
  1. Повернуть направо
  2. Пройти 2 шага
  3. Украсть.
  4. Пройти 2 шага назад.
  5. Дойти до Машки с пятого подъезда. 

Автор: MaciNT