Нужно в Экселе сделать базу данных, задание в скрине Даю максимально сколько есть балов или может комуто интереснее за кеш сделать, напишите в инсту @vadym.martn
111
416
Ответы на вопрос:
Pascalabc.net 3.3.5, сборка 1662 от 29.04.2018 внимание! если программа не работает, обновите версию! begin var n: =readinteger('количество строк(столбцов) в матрице: '); writeln('*** исходная матрица ***'); var a: =matrrandom(n,n,1,2); a.println(2); writeln(2*n*'-'); for var i: =0 to n-1 do begin var p: =a[0,i]; if a.col(i).all(t-> t=p) then print(i+1) end; end. пример количество строк(столбцов) в матрице: 5 *** исходная матрица *** 2 1 2 2 2 1 1 2 2 1 2 1 2 1 2 1 1 2 2 2 2 1 1 2 1 2
Популярно: Информатика
-
ДаРуСя1001.12.2021 20:35
-
Марьяша07717.04.2020 18:05
-
азаззазазаазз09.05.2023 10:36
-
Учёныймастер0629.07.2020 07:53
-
Лдаслл18328.02.2023 09:22
-
Artuom111116.06.2021 18:00
-
windi3701.07.2022 05:42
-
Серггій2607200614.10.2020 21:18
-
berezovskayati08.11.2021 00:16
-
валерия85826.05.2020 07:13