Предмет:
ИнформатикаАвтор:
tannerbegin
var a := ReadSeqIntegerWhile(t -> t <> 0).Pairwise
.Where(t -> (t[0] < 0) and (t[1] >= 0)).ToArray;
if a.Length > 0 then (a.Last)[1].Println
else 'Отсутствует значение, удовлетворяющее заданию'.Println
end.
Автор:
sadielxdwДобавить свой ответ
Предмет:
МатематикаАвтор:
juanadgqjОтветов:
Смотреть
Предмет:
Русский языкАвтор:
thunderОтветов:
Смотреть
Предмет:
ЛитератураАвтор:
hoochhjocОтветов:
Смотреть