Вопрос по информатике:
Найти в двумерном массиве целых чисел размером 3х4 номера отрицательных элементов (вывести их на экран), если таких нет, то сообщить об этом.
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 15.05.2015 13:07
- Информатика
- remove_red_eye 15714
- thumb_up 34
Ответы и объяснения 1
// Внимание! Если программа не работает, обновите версию!
begin
Writeln('*** Исходный массив ***');
var a:=MatrRandom(3,4,-99,99);
a.Println(4); Writeln(4*a.ColCount*'-');
var s:=a.ElementsWithIndexes.Where(z->z[0]<0);
if s.Count=0 then Writeln('Нет отрицательных элементов')
else begin
Write('Отрицательные элементы: ');
s.Select(x->Format('a[{0},{1}]',x[1]+1,x[2]+1)).Println
end
end.
Пример
*** Исходный массив ***
-62 13 -44 78
-19 73 92 -61
47 -13 3 43
----------------
Отрицательные элементы: a[1,1] a[1,3] a[2,1] a[2,4] a[3,2]
- 16.05.2015 21:18
- thumb_up 13
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.