Постройте блок-схему алгоритма, записанного на алгоритмическом языке и вычислите результат работы

program raf105;

var i,min,kolN,sumN,sariN:integer;

a:array[1..30] of integer;

begin

writeln('Элементы массива:');

min:=99;

for i:=1 to 30 do

begin

 a[i]:= random(1,60);

 write(a[i],' ');

 if (a[i]<min) and ((a[i] mod 4)=0)

   then min:= a[i];

 if ((a[i] mod 2)<>0)

   then

   begin

     kolN:= kolN+1;

     sumN:= sumN+a[i];

   end;

end;

writeln;

if min=99

 then min:=0;

sariN:= round(sumN/kolN);

writeln('Минимальное значение среди чётных элементов кратных четырём:');

writeln(min);

writeln('Среднее арифметическое среди нечётных элементов:');

writeln(sariN);

end.

Язык программирования PascalABC

1) Отрезаем 3 квадрата со стороной 131, остается прямоугольник со сторонами 131*32

2) Отрезаем 4 квадрата со стороной 32 ,(131-4*32 = 3), остается прямоугольник со сторонами 3*32

3) Отрезаем 10 квадратов со стороной 3 (32-10*3=2), остается прямоугольник со сторонами 2*3

4) Отрезаем квадрат со стороной 2 ,(3-2*1) остается прямоугольник со сторонами 1*2

5) Разрезаем на 2 квадрата со сторой 1

Итого получили: 3 квадрата 131*131; 4 квадрата - 32*32; 10 квадратов - 3*3,

1 квадрат - 2*2; 2 кадрата - 1*1