20 ! событие, вызванное либо системным, либо пользовательским приложением, приводящие к тому, что цп прекращает работу над текущей и начинает обрабатывать это событие слово начинается на п в слове всего 10 букв
262
334
Ответы на вопрос:
PascalABC.NETbegin var b := True; var n := ReadInteger('n:'); var a := MatrRandom(n, n, 0, 100); for var i := 1 to n - 1 do begin for var j := 0 to i - 1 do if a[i, j] <> a[j, i] then begin b := False; break end; if not b then break end; a.Print; b.Printend.
Пример работы:
Популярно: Информатика
-
plplem999910.07.2021 17:59
-
bobbobbobgy113.08.2021 00:28
-
abcdefgh06.03.2021 13:43
-
дан24304.12.2022 01:52
-
PolinaDudnik02.03.2022 23:09
-
ритттт20.05.2022 14:53
-
bobbygrenn03.10.2022 04:09
-
nasa21p08m1i28.07.2020 00:03
-
ваняшка06.02.2020 20:51
-
Chelovek98765432109.01.2023 02:43