Постройте отрицания следующих высказываний. 1) сегодня в театре идет опера евгений онегин 2) каждый - id309676020210612 от Маша12345678901111 12.06.2021 19:11

Question

Информатика: Постройте отрицания следующих высказываний. 1) сегодня в театре идет опера евгений онегин 2) каждый охотник желает знать, где сидит фазан. 3) число 1 есть простое число. 4) натуральные числа, оканчивающиеся чифрой 0, не являются простыми числами. 5) неверно, что число 3 не я вляется делителем числа 198. 6) коля решил все контрольной работы. 7) во всякой школе некоторые ученики интересуются спортом. 8) некоторые млекопитающие не живут на суше

Маша12345678901111 · Accepted Answer

// PascalABC.NET 3.2, сборка 1344 от 22.11.2016
// Внимание! В более ранних версиях программа работать не будет!
begin
var d:=MatrRandom(4,4,-20,20);
Writeln('Исходный массив'); d.Println(4);
var s:=d[0,0];
for var i:=1 to 3 do begin d[i,i]:=d[i,0]; s+=d[i,i] end;
Writeln('Полученный массив'); d.Println(4);
Writeln('Сумма на главной диагонали ',s)
end.

Пример
Исходный массив
14   8 -12 12
15 -9 -16 -6
18 -7   7   5
-7 -12 -10 -14
Полученный массив
14   8 -12 12
15 15 -16 -6
18 -7 18   5
-7 -12 -10 -7
Сумма на главной диагонали 40

MOGZ ответил