Вматрице с [6 x 7] определить сумму элементов, лежащих в диапазоне от x до y. заменить первую строку матрицы на значение найденной суммы.
159
206
Ответы на вопрос:
Вматрице 42 элемента. заполним её случайными значениями в диапазоне от x/2 до 2*y, тогда в среднем половина значений попадет в заданный диапазон. const m=6; n=7; var a: array[1..m,1..n] of integer; i,j,k,x,y,x1,y1,s: integer; begin randomize; write('введите через пробел x и y: '); read(x,y); if y< x then begin s: =x; x: =y; y: =s end; writeln('исходный массив'); if x< 0 then x1: =2*x else x1: =x div 2; if y< 0 then y1: =y div 2 else y1: =2*y; k: =y1-x1+1; s: =0; for i : = 1 to m do begin for j : = 1 to n do begin a[i,j]: =random(k)+x1; write(a[i,j]: 4); if (a[i,j]> =x) and (a[i,j]< =y) then s: =s+a[i,j] end; writeln end; for j: =1 to n do a[1,j]: =s; writeln('результирующая матрица'); for i : = 1 to m do begin for j : = 1 to n do write(a[i,j]: 4); writeln end end. тестовое решение: введите через пробел x и y: -5 10 исходный массив 0 11 -6 15 -8 -2 -6 9 0 6 1 11 -2 -1 2 9 13 -1 6 0 9 6 1 -5 8 -3 0 -5 8 4 -8 7 -6 6 11 18 -1 15 -8 -9 -9 20 результирующая матрица 62 62 62 62 62 62 62 9 0 6 1 11 -2 -1 2 9 13 -1 6 0 9 6 1 -5 8 -3 0 -5 8 4 -8 7 -6 6 11 18 -1 15 -8 -9 -9 20
Var a: array [1..100] of integer; k,n,i: integer; begin k: =0; readln (n); while k< n do begin k: =k+2; writeln (k); end; end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
Липапит06.01.2022 10:34
-
dima035488803.03.2022 09:33
-
vlada36214.01.2021 22:56
-
Pushokznatok13.10.2020 22:32
-
Merser221229.10.2021 22:31
-
ученик1710115.07.2020 23:03
-
kreker12803.11.2022 00:58
-
yuliyayulyafe07.05.2022 00:00
-
is835172Alexandr01.05.2023 22:26
-
veronikakorobko31.01.2022 21:32
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.