Задача: Для виготовлення жерстяної коробки використовують квадратний лист жерсті. Висота коробки становить b см. Маса 1 см2 жерсті
становить сг. Визначте масу коробки. Побудуйте блок-схему для
розв'язування задачі та реалізуйте відповідну програму.​

Для примера со сложением чисел 25 учениками попробуйте проанализировать следующие ситуации: в классе всего 1 кусок мела; в классе 5 кусков мела; в классе 25 кусков мела. оцените, как от этого зависит время решения (учтите ещё ширину доски и время перемещения учеников по классу) попробуйте построить модель такого процесса. переведите эту ситуацию на язык компьютерной терминологии для многопроцессорных систем. 2) попробуйте примеры алгоритмов поиска информации в массиве и сортировки массива, которые допускают распараллеливание операций. опишите процедуру распараллеливания. сколько процессоров необходимо для эффективного распараллеливания в вами примере?

Program p1;
Const N=10;//подставишь нужное N
Var A:array[1..N] of integer;
summa,kolvo,i:integer;
Begin
For i:= 1 to n do
Begin
A[i]:=random(101)-50;
Write(A[i],' ');
End;
Writeln;
For i:= 1 to n do
If a[i] mod 2<>0 then
Begin
summa:=summa+A[i];
kolvo:=kolvo+1;
End;
Writeln('Среднее арифметическое = ',summa/kolvo);
End.

 

 

Program p2;
Const N=10;//подставишь нужное N
Var A:array[1..N] of integer;
kolvo,i:integer;
Begin
For i:= 1 to n do
Begin
A[i]:=random(101)-50;
Write(A[i],' ');
End;
Writeln;
For i:= 1 to n do
If a[i] mod 2=0 then
kolvo:=kolvo+1;
Writeln('Число чётных элементов = ',kolvo);
End.