Цитата:
Сообщение от AlexZir
даю только часть, относящуюся к обработке массива
Код:
for i:=1 to n-1 do
if (a[i]>a[i-1]) and (a[i]<a[i+1]) then writeln(i);
остальное допишите сами, ибо нефиг  |
Только малость не так:
Код:
for i:=1 to n-1 do
if (x>a[i]) and (x<=a[i+1]) then writeln(i);
А вот насчет "нефиг" - согласен целиком и полностью! Совсем уже обленились. Вываливают срамные школьные задачки - лишь бы пальцем о палец не ударить.
Да, Лёша - смена растет. Надеюсь помереть раньше, чем такие вот Днища встанут у руля страны.