Написать программу в паскаль! нахождение суммы чисел в матрице, ввод чисел осуществить из файла matrix.txt вывод на экран.
250
357
Ответы на вопрос:
//pascal abc.net v3.1 сборка 1172 const n=3; //количество строк m=4; //количество столбцов var f: text; ma: array[1..n,1..m] of integer; i,j,s: integer; begin assign(f,'matrix.txt'); reset(f); for i: =1 to n do begin for j: =1 to m do begin read(f,ma[i,j]); s: =s+ma[i,j]; end; end; close(f); for i: =1 to n do begin writeln; for j: =1 to m do write(ma[i,j]: 4); end; writeln; write(s); end. matrix.txt: 1 2 3 4 4 5 6 4 7 8 9 4 вывод программы: 1 2 3 4 4 5 6 4 7 8 9 4 57
Const n = 20; var x: array[1..n] of integer; i, s: integer; begin randomize; s : = 0; write('элементы массива: '); for i : = 1 to n do begin x[i] : = random(101) - 50; write(x[i]: 5); if x[i] > = 0 then s : = s + sqr(x[i]) end; writeln(#13#10, 'сумма квадратов неотрицательных элементов равна ', s) end. тестовое решение: элементы массива: -29 1 -36 50 -29 31 4 28 -25 -1 17 -45 -48 -19 -49 -49 -30 -22 8 18 сумма квадратов неотрицательных элементов равна 4939
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
egor2003151012.03.2023 15:34
-
Mashka06319.01.2022 16:50
-
Мирамкуль126.01.2023 20:35
-
lanamalinena21.05.2021 21:52
-
спишиru120.01.2021 13:17
-
Alina970azhieva11.01.2020 00:23
-
natamelnichenko29.03.2021 04:55
-
katrinmirz16.11.2022 04:46
-
DobinaDaria109.11.2021 08:39
-
kh13113.08.2022 17:39
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.