Дан массив.Упорядоченный по возрастанию и число b неравное ни одному из этих элементов.Найти элемент массива ближайший к b.
Дан массив.Упорядоченный по возрастанию и число b неравное ни одному из этих элементов.Найти элемент массива ближайший к b.
Гость
Ответ(ы) на вопрос:
Гостьvar a:array[1..10] of integer;
i,b,ind,el,min:integer;
begin
min:=1000000;
for i:=1 to 10 do
read(a[i]);
readln;
read(b);
for i:=1 to 10 do begin
if abs(a[i]-b)
Не нашли ответ?
Похожие вопросы