Решить задачу дан двумерный массив целых чисел вывести только четные строки массива сохраняя порядок их следования и порядок записи элементов в этих строках
Ответы
Ответ дал:
0
===== 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.
Приложения:
![](https://st.uroker.com/files/237/237f2649c50b277fd75ea7bc298ba7fe.jpg)
![](https://st.uroker.com/files/4a4/4a4190d4094d91669ee82725a236f670.jpg)
Вас заинтересует
3 месяца назад
3 месяца назад
5 месяцев назад
5 месяцев назад
2 года назад
7 лет назад