Вопрос по информатике:
Данн массив R (6 , 6 ). Найти все строки , количество положительных элементов которых > 5 , и напечатать их номер , подсчитать общее количество таких строк.
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 23.07.2018 14:30
- Информатика
- remove_red_eye 15998
- thumb_up 22
Ответы и объяснения 1
a:array[1..100] of integer;
n,s,i:integer;
begin
readln(n);
s:=0;
for i:=1 to n do
begin
a[i]:=Random(13)-6;
write(a[i],' ');
end;
writeln;
for i:=1 to n do
if a[i]>5
then begin write(i,' '); inc(s); end;
writeln;
writeln(s);
readln
end.
- 25.07.2018 00:49
- thumb_up 36
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.