В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
saraavetisyan2
saraavetisyan2
28.03.2021 09:14 •  Информатика

Определить, сколько строк заданной матрицы a(n,m) содержат хотя бы один
элемент из заданного числового диапазона. (pascal)

Показать ответ
Ответ:
artemushakov0артем
artemushakov0артем
09.10.2020 19:58

Программа:

const n=6; m=5;

var

x:array[1..n,1..m] of integer;

i,j,a,b,k:integer;

f:boolean;

begin

Randomize;

writeln('Исходный массив:');

for i:=1 to n do

begin

for j:=1 to m do

 begin

  x[i,j]:=random(50);

  write(x[i,j]:4);

 end;

 writeln;

end;

write('a, b: ');

readln(a,b);

k:=0;

for i:=1 to n do

begin

f:=false;

for j:=1 to m do

 if (x[i,j]>=a)and(a<=b) then f:=true;

if f then k:=k+1;

end;

writeln('k = ',k);

end.

Пример:

Исходный массив:

  2  42  11  34  11

 26  46  37  21  12

  7  18   8  11  29

 25  38   4  18  14

  8  13   8  46  41

 22  29   3  47  46

a, b: 40 50

k = 4

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота