Информация - это сведения, об окружающем нас мире. Алгоритм - это конечная последовательность шагов при решении задач, приводящая от исходных данных к конечному результату Модель - это объект, дающий упрощенное представление о реальном объекте, процессе или явлении, который отражает существенные стороны изучаемого объекта с точки зрения цели моделирования. Система - специальная программа Команда - это действие для выполнения задачи компьютером Приложение - последовательность инструкций, предназначенных для исполнения устройством управления вычислительной машины
A - Аня, b - Боря, v - Вася, g - Галя, d - Даша, i - Иван. a>b, v>g, d<i, v<a, d>b; Мы знаем, что а>b, значит ,что b<v; Мы знаем, что d>b, значит ,что b<i; Мы знаем, что v>g и v<a, значит ,что b<v; Следовательно мы нашли обладателя меньшей флешки. Им стал Боря. Раз b самый меньший, то в дальнейших расчетах его можно не использовать. Мы знаем, что a>v, а это значит ,что a>g т.к. v>g ! Мы знаем, что i>d и что d>b, а отношения a к i из условия найти нельзя... Поэтому обладателем самой большой флешки может быть как и Аня так и Иван.
===== PascalABC.NET =====
begin
var (m, n) := ReadInteger2('Число строк и столбцов:');
var a := MatrRandom(m, n, -99, 99);
a.Println(4);
Writeln;
var vc := ArrGen(n, i -> i);
var vr := ArrGen(m div 2, i -> 2 * i + 1);
a.MatrSlice(vr, vc).Println(4)
end.
Замечание: Если компилятор на распознает MatrSlice, следует обновить его версию хотя бы до 3.5.1.2250 от 14.09.19.
Если Вы не имеет такой возможности, используйте альтернативный вариант, но в этом случае будет утрачено "красивое" форматирование результата.
begin
var (m, n) := ReadInteger2('Число строк и столбцов:');
var a := MatrRandom(m, n, -99, 99);
a.Println(4);
Writeln;
foreach var i in Range(1, m -1, 2) do
a.Row(i).Println;
end.