(Pascal) Двумерный целочисленный массив A(m,n) вводится с клавиатуры или генерируется случайными числами в пределах -20 до 20. Требуется:

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

использовать Чертежник

алг

нач

нц 3 раз

фигура

сместиться на вектор (5,-1)

кц

кон

алг квадрат

нач

выбрать чернила(синий)

опустить перо

сместиться на вектор (0,5)

сместиться на вектор (5,0)

сместиться на вектор (0,-5)

сместиться на вектор (-5,0)

поднять перо

кон

алг треугольник

нач

выбрать чернила(желтый)

опустить перо

сместиться на вектор (1.5,3)

сместиться на вектор (1.5,-3)

сместиться на вектор (-3,0)

поднять перо

кон

алг фигура

нач

квадрат

сместиться на вектор (1,1)

треугольник

кон

Объяснение:

скрин

/*Твой код написан на С++, поэтому я так понимаю, что ответ нужен также на нём.*/

#define _CRT_SECURE_NO_WARNINGS

#include <iostream>

#include <string>

#define SIZE 256

int main() {

   const char* DELIMITERS = "_.,;:\n\t!?";        

   char S[SIZE] = "Hello, my2. friend_ia2m?hh2";    

   char* ptr = 0;  

   ptr = strtok(S, DELIMITERS);

   while (ptr) {                

       for (int i = 0; i < strlen(ptr); i++) {

           if (isdigit(ptr[i]))

               std::cout << ptr << "\n";

       }

       ptr = strtok(0, DELIMITERS);    

   }

   return 0;

}