#+(Л) +^#(Е) #(С) ^#(К) ^(А)
Ответ: Леска
<em>// PascalABC.NET 3.3, сборка 1579 от 18.11.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var a:=ReadArrInteger(12);
Writeln('Номер первого отрицательного элемента: ',a.FindIndex(t->t<0)+1);
end.
<u>Пример</u>
36 20 -13 50 14 27 -1 26 -14 -17 -15 42
Номер первого отрицательного элемента: 3
<u>Замечание:</u> Значения всех 12 элементов вводятся с клавиатуры
В 1 гб. - 1000 мб.
В 1 мб.- 1000 кб.
В 1 б. - 1 бт.
1. набор кнопок с цифрами и знаками математических действий
2. линейным
3. система команд исполнителя
A = -5
A>0 ⇒ ЛОЖЬ
A<0 ⇒ ИСТИНА
A = -3*A = -3*-5 = 15
Ответ: 15