Найти наименьший элемент массива, и его номер среди чисел,минимальное число должно быть больше за b и меньше за a.
Найти наименьший элемент массива, и его номер среди чисел,минимальное число должно быть больше за b и меньше за a.
Гость
Ответ(ы) на вопрос:
Гостьconst
nn=50;
var
i,n,a,b,im,min:integer;
x:array[1..nn] of integer;
begin
ClrScr;
Write('n= '); Read(n);
Write('b,a= '); Read(b,a);
im:=0;
for i:=1 to n do begin
Write('x[',i,']='); Read(x[i]);
if im=0 then im:=i
else begin if x[i]
Не нашли ответ?
Похожие вопросы