Я пошёл в школу-истинное.Я не пошёл в школу-ложное.
<em>// PascalABC.NET 3.2, сборка 1407 от 18.03.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var b:=Arr(2,7,11,15,4,-2,6);
Writeln('Первое отрицательное под номером ',b.FindIndex(k->k<0)+1);
Writeln('Сумма положительных ',b.Where(k->k>0).Sum);
Writeln('Минимальное значение под номером ',b.IndexMin+1)
end.
<u>Результат</u>
Первое отрицательное под номером 6
Сумма положительных 45
Минимальное значение под номером 6
V - логическое сложение.
-> импликация.
& - логическое умножение.
(x+y)->(x*z)
Порядок действий: сначала считаем первую скобку, потом вторую, затем из первой скобки делаем импликацию второй скобки. Импликация равна нулю только тогда, когда и 1 следует (->) 0. Во всех остальных случаях импликация равна единице.
Исходя из данного условия имеем два варианта ответа:
1) zxy
2) zyx
Распишем первый вариант и второй.
Первый вариант отпадает на 6 строке из таблицы в задании. т.к при подсчете функция равна 0, а в таблице она равна 1.
Второй вариант подошел, т.к при подсчете функции равны со значением в таблице.
Ответ: zyx
1024000 * 5 = 5120000 Бит
1Бит = 0,000125Кбайт
5120000 * 0,000125 = 640Кбайт
