Ответы на вопрос:
Исправь последнюю часть и в описании переменных добавь 2 дополнительных переменных а1 и а2. sum, kolvoel, i, j, n, a1, a2 : integer; srar: =sum/kolvoel; writeln('srasr=',srar); for i: =n downto 1 do for j: =n downto 1 do if b[i,j]> srar then begin a1: =i; a2: =j; end; writeln('i=',a1,' j=',a2); end.
Популярно: Информатика
-
feruza111101.09.2021 13:26
-
shingekinokoyji17.04.2021 10:31
-
megamerezhnikova06.09.2021 10:01
-
Artemov9Artem12.06.2022 19:13
-
tixon150128.03.2022 06:55
-
Mara645813.04.2022 12:45
-
Bogqwerty22.03.2021 10:30
-
savallll17.05.2022 11:02
-
КирилБыков26.06.2020 08:11
-
2899101714lp28.02.2022 07:05