Дано трехзначное число n. проверить, будет ли сумма его цифр четным числом. кто может, напишите алгоритм решения для программы паскаль

Var a,b,c,k: integer; begin read(a); c: =10; b: =0; for k: =1 to 3 do begin b: =b + a mod c; c: =c+10; end; if (b mod 2= 0) then write ('norm') else write ('nechetnoe'); end.

Const   nn=20; var   i,j,a,b,m,x,la,lb,p,ij,mn: integer;   s: string;   d: array[1..nn,1..nn] of integer; begin   {инициализация и вывод массива}   write('число строк и столбцов в массиве: ');   read(m,x);   write('диапазон значений элементов массива: ');   read(a,b);   str(a,s);   la: =length(s);   str(b,s);   lb: =length(s);   if la> lb then p: =la+1 else p: =lb+1;   randomize;   writeln('исходный массив');   for i: =1 to m do begin       for j: =1 to x do begin           d[i,j]: =random(b-a+1)+a;           write(d[i,j]: p)           end;       writeln       end;   {нахождение минимума}   if i> j then ij: =j else ij: =i;   mn: =d[1,1];   for i: =1 to ij do       for j: =1 to x-i do           if d[i,j]< mn then mn: =d[i,j];   writeln('минимальный элемент выше побочной диагонали равен ',mn) end. пример работы число строк и столбцов в массиве: 5 8 диапазон значений элементов массива: -50 50 исходный массив   -10 -18 -42 -33    6  15 -29  16   -5 -22    7 -49 -43 -44 -42  22   36 -29  19 -26 -14 -49 -39    2     2  35 -16  44  13  26 -12 -40   -50  10 -42 -13  29 -22 -48  34 минимальный элемент выше побочной диагонали равен -50

//dev-c++ 5.11 (c) #include < stdio.h> #include < ctime> #include < stdlib.h> int main(void)   {const int m=5;   const int x=5;   int matrix[m][x],min,a,b;   srand(time(null));   scanf("%d %d",& a,& b);   for(int i=0; i< m; i++)   {for(int j=0; j< x; j++)     {matrix[i][j]=(rand()%(b+1-a))+a; //r=(rand()%(max+1-min))+min     printf("%d ",matrix[i][j]); }   printf("\n"); }   a=1;   min=matrix[0][0];   for(int i=0; i< m; i++)   {for(int j=0; j< x-a; j++)     if(min> matrix[i][j])     min=matrix[i][j];   a++; }   printf("%d",min);   return 0; } пример ввода: -30 30 пример вывода: 3 11 -18 21 27 22 -5 21 13 -11 -6 15 16 -28 -5 10 -15 6 -24 -3 -10 -15 25 -30 -30 -18