Разработка программ для обработки двумерных массивов

@Rain12 · Регистрация: 25.05.2020

Author24 — интернет-сервис помощи студентам

Дан двумерный массив, размерностью 4х5. Найти: Произведение элементов массива, имеющих оба четных индекса. Задачу необходимо решить на языке PASCAL ABC

@Sun Serega · 21.12.2020, 10:25

Pascal

## var m := MatrRandom(4,5).Println;
var res := 1bi;
foreach var ind1 in Range(0, m.GetLength(0)-1, 2) do
  foreach var ind2 in Range(0, m.GetLength(1)-1, 2) do
    res *= m[ind1, ind2];
res.Println;

@canadamoscow · 21.12.2020, 11:47

Pascal

1
2
3

## var res := 1bi;
MatrRandom(4,5).Println.ForEach((t,i,j) -> if i.IsEven and j.IsEven then res *= t);
res.Println;

@Rain12 0 / 0 / 0 Регистрация: 25.05.2020 Сообщений: 4
		1
	Разработка программ для обработки двумерных массивов 21.12.2020, 00:25. Показов 506. Ответов 2 Метки pascal abc, pascal abc.net, паскаль (Все метки) Дан двумерный массив, размерностью 4х5. Найти: Произведение элементов массива, имеющих оба четных индекса. Задачу необходимо решить на языке PASCAL ABC 0

	21.12.2020, 11:47