Вибери істинні висловлювання. * Кожний кадр відео завжди зберігається в окремому файлі. Відеофайли не можуть містити аудіоданих. При збільшенні частоти дискретизації покращується якість звуку. Відеофайл містить набір статичних зображень.ГИПНН
Program pr1; const n=19; var i, l: integer; Dat: array [1..n] of integer; New: array [1..n] of integer; begin write('Dat: '); for i:=1 to n do begin Dat[i]:=random(30)-15; write(Dat[i],' '); end; writeln(); write('New: '); l:=0; for i:=1 to n do if (Dat[i]>=0) and (Dat[i] mod 8<>0) then begin l:=l+1; New[l]:=Dat[i]; end; for i:=1 to l do write(New[i],' '); end.
Для примера со сложением чисел 25 учениками попробуйте проанализировать следующие ситуации: в классе всего 1 кусок мела; в классе 5 кусков мела; в классе 25 кусков мела. оцените, как от этого зависит время решения (учтите ещё ширину доски и время перемещения учеников по классу) попробуйте построить модель такого процесса. переведите эту ситуацию на язык компьютерной терминологии для многопроцессорных систем. 2) попробуйте примеры алгоритмов поиска информации в массиве и сортировки массива, которые допускают распараллеливание операций. опишите процедуру распараллеливания. сколько процессоров необходимо для эффективного распараллеливания в вами примере?
const n=19;
var i, l: integer;
Dat: array [1..n] of integer;
New: array [1..n] of integer;
begin
write('Dat: ');
for i:=1 to n do begin
Dat[i]:=random(30)-15;
write(Dat[i],' ');
end;
writeln();
write('New: ');
l:=0;
for i:=1 to n do if (Dat[i]>=0) and (Dat[i] mod 8<>0) then begin
l:=l+1;
New[l]:=Dat[i];
end;
for i:=1 to l do write(New[i],' ');
end.