Найти произведение неположительных элементов двумерного массива целых чисел кратных 4

PascalABC.NET 3.4, сборка 1670 от 23.05.2018
Внимание! Если программа не работает, обновите версию!

begin
  var (m,n):=ReadInteger2('Количество строк и столбцов в массиве:');
  Writeln('*** Исходный массив ***');
  var a:=MatrRandom(m,n,-99,99);
  a.Println(4); Writeln(4*a.ColCount*'-');
  a.ElementsByRow.Where(t->(t<=0) and (t mod 4=0))
      .Aggregate(BigInteger(1),(p,q)->(p*q)).Println
end.

1.   66

2.   165

Объяснение:

1.

s = 0       k = 1

Действия в цикле:

1) s = s + k

2) k = k + 1

Пока условие k > 11 ложно (нет) цикл выполняться

Вывод s

s = 0       k = 1

Действия в цикле:

1) s = s + k = 0 + 1 = 1

2) k = k + 1  = 1 + 1 = 2

2 > 11  (нет) цикл выполняться

s = 1       k = 2

Действия в цикле:

1) s = s + k = 1 + 2 = 3

2) k = k + 1  = 2 + 1 = 3

3 > 11  (нет) цикл выполняться

s = 3       k = 3

Действия в цикле:

1) s = s + k = 3 + 3 = 6

2) k = k + 1  = 3 + 1 = 4

4 > 11  (нет) цикл выполняться

s = 6       k = 4

Действия в цикле:

1) s = s + k = 6 + 4 = 10

2) k = k + 1  = 4 + 1 = 5

5 > 11  (нет) цикл выполняться

s = 10       k = 5

Действия в цикле:

1) s = s + k = 10 + 5 = 15

2) k = k + 1  = 5 + 1 = 6

6 > 11  (нет) цикл выполняться

s = 15       k = 6

Действия в цикле:

1) s = s + k = 15 + 6 = 21

2) k = k + 1  = 6 + 1 = 7

7 > 11  (нет) цикл выполняться

s = 21       k = 7

Действия в цикле:

1) s = s + k = 21 + 7 = 28

2) k = k + 1  = 7 + 1 = 8

8 > 11  (нет) цикл выполняться

s = 28       k = 8

Действия в цикле:

1) s = s + k = 28 + 8 = 36

2) k = k + 1  = 8 + 1 = 9

9 > 11  (нет) цикл выполняться

s = 36       k = 9

Действия в цикле:

1) s = s + k = 36 + 9 = 45

2) k = k + 1  = 9 + 1 = 10

10 > 11  (нет) цикл выполняться

s = 45       k = 1 0

Действия в цикле:

1) s = s + k = 45 + 10 = 55

2) k = k + 1  = 10 + 1 = 11

11 > 11  (нет) цикл выполняться

s = 55       k = 11

Действия в цикле:

1) s = s + k = 55 + 11 = 66

2) k = k + 1  = 11 + 1 = 12

12 > 11  (да) цикл не выполняться

s = 66       k = 12

2.

s = 0       k = 0

пока условие k < 30 истинно (да) цикл выполняется

Действия в цикле:

1) k = k + 3

2) s = s + k

Вывод s

s = 0       k = 0

0 < 30 (да) цикл выполняется

Действия в цикле:

1) k = k + 3 = 0 + 3 = 3

2) s = s + k  = 0 + 3 = 3

s = 3       k = 3

3 < 30 (да) цикл выполняется

Действия в цикле:

1) k = k + 3 = 3 + 3 = 6

2) s = s + k  = 3 + 6 = 9

s = 9       k = 6

6 < 30 (да) цикл выполняется

Действия в цикле:

1) k = k + 3 = 6 + 3 = 9

2) s = s + k  = 9 + 9 = 18

s = 18       k = 9

9 < 30 (да) цикл выполняется

Действия в цикле:

1) k = k + 3 = 9 + 3 = 12

2) s = s + k  = 18 + 12 = 30

s = 30       k = 12

12 < 30 (да) цикл выполняется

Действия в цикле:

1) k = k + 3 = 12 + 3 = 15

2) s = s + k  = 30 + 15 = 45

s = 45       k = 15

15 < 30 (да) цикл выполняется

Действия в цикле:

1) k = k + 3 = 15 + 3 = 18

2) s = s + k  = 45 + 18 = 63

s = 63       k = 18

18 < 30 (да) цикл выполняется

Действия в цикле:

1) k = k + 3 = 18 + 3 = 21

2) s = s + k  = 63 + 21 = 84

s = 84       k = 21

21 < 30 (да) цикл выполняется

Действия в цикле:

1) k = k + 3 = 21 + 3 = 24

2) s = s + k  = 84 + 24 = 108

s = 108       k = 24

24 < 30 (да) цикл выполняется

Действия в цикле:

1) k = k + 3 = 24 + 3 = 27

2) s = s + k  = 108 + 27 = 135

s = 135       k = 27

27 < 30 (да) цикл выполняется

Действия в цикле:

1) k = k + 3 = 27 + 3 = 30

2) s = s + k  = 135 + 30 = 165

s = 165       k = 30

30 < 30 (нет) цикл не выполняется

s = 165       k = 30

рафика

Векторная графика

Двухмерная графика

История

Области применения

Растровая графика

Фрактальная графика

Спецэффекты

3D в играх

3D в фильмах

События 3D

Трёхмерная графика

3D-анимация

Графика в Web

Примитивы трёхмерной графики

Программное обеспечение

События

Уроки

3D ГРАФИКА. ЧТО ЭТО ТАКОЕ

производство рекламы

3D графика или трёхмерная графика – это один из разделов компьютерной графики, комплекс приемов и инструментов, которые позволяют создать объемные объекты при форма и цвета. От двухмерных изображений она отличается тем, что подразумевает построение геометрической проекции трехмерной модели сцены (виртуального пространства) на плоскость, делается это при специализированных программ. Полученная модель может соответствовать объектам реального мира (например, здание, человек, автомобиль, астероид) или быть целиком абстрактной (проекция четырехмерного фрактала).

Сегодня 3D графика прочно вошла во многие сферы нашей жизни – это:

строительство (визуализация объемных архитектурных изображений зданий, объектов, интерьера, экстерьера);

производство (объектное моделирование);

телевидение (моделированные фото в глянцевых журналах, видеоролики, спецэффекты в кино),

игровая индустрия (3D-анимация и виртуальные миры, разработка компьютерных игр);

полиграфия (создание полиграфической продукции),

реклама (электронные презентации и каталоги, рекламные щиты и пр.) и т.д.

3D-графика - один из наиболее эффективных инструментов в рекламе, позволяющий расширить влияние на потенциального клиента и повысить качество преподносимой рекламы как реальном, так и в виртуальном мире.