Вопрос по информатике:
1) В массиве из 11 действительных чисел, введённых с клавиатуры, найти номер первого положительного элемента и выдать на экран этот элемент или сообщение о том, что в массиве положительных элементов нет.
прошу вас решите!
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 27.09.2018 18:25
- Информатика
- remove_red_eye 11408
- thumb_up 24
Ответы и объяснения 1
Var a:array[1..11] of real;
t,i:integer;
begin
for i:=1 to 11 do
read(a[i]);
for i:=1 to 11 do
if a[i]>0 then begin t:=i; break; end;
if t0 then writeln(a[t])
else writeln('Not found');
end.
- 28.09.2018 06:25
- thumb_up 46
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.