Вопрос по информатике:
Ребят срочно! Вывести на печать первый отрицательный элемент массива А(20) и его номер, пологая что в массиве есть хотябы один отрицательный элемент
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 08.07.2016 15:34
- Информатика
- remove_red_eye 11067
- thumb_up 25
Ответы и объяснения 1
Var A:Array [1..20] Of Integer;
I : Integer;
Begin
WriteLn('Введите элементы массива');
For I:=1 To 20 Do Begin
Read(A(I));
End;
I:=0;
Repeat
I:=I+1;
Until I=20 Or A(I)<0;
WriteLn(A(I),'Первое отрицательное число ');
End.
- 09.07.2016 04:24
- thumb_up 47
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.