Если Света и Настя идут в лес, то и Маша идет в лес. Иначе - если они идут на рыбалку - то и Маша тоже. Если они идут на рыбалку, то Гриша тоже. Иначе - если они идут в лес - то и Гриша идет в лес. А Алексей вместе с Гришей. Получается, что Маша, Гриша и Алексей идут туда, куда идут Света и Настя. Света, похоже, везде ходит вместе с Настей. А Настя идет вслед за Мишей. Получается, что они все идут вслед за Мишей. Верное утверждение 2: Если Света идет в лес, то все берут корзины и ножики и тоже идут в лес за грибами.
// PascalABC.NET 3.1, сборка 1218 от 12.04.2016 begin var m,n:integer; Write('Количество строк и столбцов матрицы: '); Read(n,m); var a:=MatrixRandom(n,m,10,99); for var i:=0 to n-1 do begin for var j:=0 to m-1 do Print(a[i,j]); Writeln end; var p:=ReadInteger('Введите число Р:'); var b:array of integer; SetLength(b,4*m); var k:=0; for var i:=n-p to n-1 do for var j:=0 to m-1 do if a[i,j] mod 4=0 then begin b[k]:=a[i,j]; Inc(k) end; SetLength(b,k); b.Print end.
А какой то задания?