8. дан двумерный массив. определить: а) сумму всех элементов массива; б) сумму квадратов всех элементов массива.

program pr1; uses crt; const n=20; var mas: array[1..n,1..n] of integer; i,j,v: integer; beginclrscr; v: =0; randomize; for j: =1 to n dofor i: =1 to n do mas[i,j]: =random(10); for j: =1 to n dofor i: =1 to n do v: =v+mas[i,j]; writeln('summa=',v); {a}v: =0; for j: =1 to n dofor i: =1 to n do v: =v+sqr(mas[i,j]); writeln('summa sqr=',v); {б}end.

2) const n=10; var a: array[1..n] of integer; k,i: integer; begin writeln('vvedite massiv='); for i : = 1 to n do  readln(a[i]); k: =0; for i : =   1 to n do  if a[i]> 0 then   inc(k); writeln ('k=',k); readln; end. 1) const n=10; var a: array[1..n] of integer; s,p,i: integer; begin writeln('vvedite massiv='); for i : = 1 to n do  readln(a[i]); s: =0; p: =1; for i : =   1 to n do  if (a[i] mod 2=1) and (a[i] mod 3=0) then begin  s: =s+a[i]; p: =p*a[i]; end; writeln('s=',s, ' p=',p); readln; end.

По моему где то еще в начальной школе было разложение обычного десятичного числа по , типа: 155367=100000+50000+5000+300+60+7 уже наверно в средней школе это усложнилось и вас возможно заставляли делать так: на самом деле это называется что то вроде представления числа в стандартном виде если все что мы расписали умножить и сложить обратно мы разумеется получим исходное число в нашем примере основание системы счисления 10 а теперь если подобные манипуляции произвести с любым другим числом записаным в другой системе счисления но при этом заменить десятку на основание системы счисления  ( а это может быть какоеугодно число) то мы получим числозаписаное в обычном виде. возможно тебе не понятны термины навроде системы счисления? на всякий случай(грубо говоря): сист счисл-я - это правила по которым мы записываем числа или сколько цифр используем для записи чисел например десятичная с.с.: используется 10 цифр, 0 1 2 3 4 5 6 7 8 9 а в двоичной мы все числа записываем с двух цифр, единицы и нуля, это происходит примерно так: 0=0 1=1 2=10 3=11 4=100 5=101 6= 110 и так далее(возможно несколько сумбурно и не понятно но я честно пытаюсь донести все простым языком) основанием системы счисления называется количество цифр которое используется для записи чисел ps кстати это основание как правило записывается в низу после числа, и возможно вы перепутали его со степенью)) вроде теорию постаралась обьяснить, а теперь само 10000101= = =133 //упс здесь действительно 133, я ранее ошиблась чуток)) 00011001=  =16+8+1=25 1110011= =64+32+16+0+0+2+1=80+35=115 11,11=