Вопрос по информатике:
Найти наименьший элемент массива, и его номер среди чисел,минимальное число должно быть больше за b и меньше за a.
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 03.03.2016 17:10
- Информатика
- remove_red_eye 16750
- thumb_up 40
Ответы и объяснения 1
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]
Writeln;
if (im=0) or (not (x[im] in [b..a])) then Writeln('No solution')
else Writeln('x[',im.']=',x[im],' is minimal');
ReadKey
end.
Тестовое решение:
n=5
b,a= 4 8
x[1]=9
x[2]=7
x[3]=9
x[4]=6
x[5]=8
x[4]=6 is minimal
- 04.03.2016 12:05
- thumb_up 17
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.