2 Гагарин | Космос | полёт
4 Гагарин | Космос
3 Гагарин & полёт
1 Космос & Гагарин & полёт
Вікно налаштування параметрів містить такі елементи:
Создать переменную, в которой будем хранить сумму (допустим S). Затем обнулить её. Теперь создадим 2 вложенных цикла: по i от 1 до 5, а внутри него по j от 7-i до 5. Внутри второго цикла прибавляем к s элемент из строки i и столбца j. После этих циклов, в S будет содержаться ответ.
Var i,q:integer;s:real;a:array[1..10]of integer;beginfor i:=1 to 10 do begina[i]:=random(100);s:=s+a[i];end;s:=s/10;for i:=1 to 10 do beginwriteln(a[i]);if a[i]>s then q:=q+i;end;writeln(q);end.
1 - А (если 1 символ занимает один байт, то 60*1 = 60)
2 - Б
3 - В (2^8 = 256)
4 - В
5 - А