В школьной олимпиаде участвовало 75 человек, победителями считаются те, кто набрал больше 90 % по каждому предмету. Итоговая таблица участников представлена на рисунке. Составь условие, при которого можно будет определить победителей.
Ответы на вопрос:
const m=10; n=12; var a: array [1..m,1..n] of integer; i,j: integer; sob: integer; sst: array[1..n]of integer; sstr: array[1..m]of integer; beginrandomize; for i: =1 to m do beginfor j: =1 to n do begina[i,j]: =random(10); write(a[i,j]: 3); end; writeln; end; sob: =0; for i: =1 to m do beginfor j: =1 to n do beginsob: =sob+a[i,j]; end; end; writeln('сумма всех элементов массива = ', sob); writeln; writeln; for i: =1 to m do beginsstr[i]: =0; for j: =1 to n do beginsstr[i]: =sstr[i]+a[i,j]; end; end; writeln('сумма элементов построчно'); for i: =1 to m do write(sstr[i]: 3); writeln; writeln; for j: =1 to n do beginsst[j]: =0; for i: =1 to m do beginsst[j]: =sst[j]+a[i,j]; end; end; writeln('сумма элементов по столбцам'); for j: =1 to n do write(sst[j]: 3); end.
Популярно: Информатика
-
DedMazaj28.11.2020 09:13
-
JoYCasinI255809.01.2022 14:04
-
fomax133712.02.2023 12:16
-
ятупик215.08.2021 00:48
-
Lagoona03029.11.2022 08:23
-
Kember20.10.2020 06:08
-
katerinaket0426.02.2021 09:43
-
hjhthy23.10.2020 18:47
-
svetakurilova30.11.2021 18:21
-
Sasha67000023.10.2022 20:43