Введите, что будет выведено в результате
выполнения следующего фрагмента программы:
a = 20:
b:= 40;
if a mod b = b-a
then x := 10 else x:=20;
writeln (х);​

10

Объяснение:

Если выполнять задачу поэтапно, то:

- a mod b = 20 mod 40 = 20;

- b - a = 40 - 20 = 20;

- 20 = 20, значит x = 10.

Будет выведено 10.

//pascalabc.net//версия 3.3, сборка 1611 (06.01.2018)begin  var a: =matrrandom(4,5,-20,20).println;   var c: =a.elementsbyrow;   println('кол-во положительных -> ',c.where(t-> t> 0).count);   println('кол-во кратных 7 -> ',c.where(t-> t mod 7=0).count);   println('сред. арифм. отрицат. -> ',c.where(t-> t< 0).average);   var b: =a.elementswithindexes.minby(t-> t[0]);   writeln('минимальный -> ', b[0],'[',b[1]+1,',',b[2]+1,']');   b: =a.elementswithindexes.where(t-> t[0]< 0).maxby(t-> t[0]);   writeln('максимальный отриц. -> ', b[0],'[',b[1]+1,',',b[2]+1,']'); end.пример:   -10    6  12    7    4  -8  -4    3  -1    6    9  -2  16  19 -18  18    4  -3  12  -8кол-во положительных -> 12  кол-во кратных 7 -> 1  сред. арифм. отрицат. -> -6.75  минимальный -> -18[3,5]максимальный отриц. -> -1[2,4]