с информатикой . Задание :составить таблицы истинности для логических выражений
184
375
Ответы на вопрос:
// pascalabc.net 3.2, сборка 1362 от 14.12.2016 // внимание! в других версиях языка работа не гарантируется! begin var m: =readinteger('количество строк в массиве: '); var n: =readinteger('количество столбцов в массиве: '); writeln('*** исходный массив a[',m,',',n,'] ***'); var a: =matrrandom(m,n,-50,50); a.println(4); writeln(4*a.colcount*'-'); var k: =a.rows.select(x-> x.aggregate(0,(x,y)-> x+.indexmax; for var j: =0 to (n-1) div 2 do swap(a[k,j],a[k,n-1-j]); a.println(4) end. пример количество строк в массиве: 4 количество столбцов в массиве: 5 *** исходный массив a[4,5] *** 29 36 -50 -4 -32 -1 -10 -7 -47 -50 -16 4 48 -41 -43 8 46 45 14 -44 29 36 -50 -4 -32 -1 -10 -7 -47 -50 -16 4 48 -41 -43 -44 14 45 46 8
Популярно: Информатика
-
2239105.12.2022 17:32
-
cohka0609.06.2022 11:40
-
ScreamATD20.04.2021 16:18
-
pasha26817.06.2022 07:49
-
McEgorKa04.01.2020 15:31
-
Elena20720719.11.2021 09:17
-
angeloknet114.06.2022 05:39
-
aalina76024.08.2021 01:30
-
vikulka148819.02.2021 13:14
-
linabananchik31.03.2020 23:51