Задание

В таб­ли­це Work хра­нят­ся дан­ные о ко­ли­че­стве заказов, при­ня­тых фир­мой «Алоэ» с пер­во­го по 15 ноября. \(Work⟨0⟩ − число заказов, при­ня­тых 1 ноября, Work⟨1⟩ − 2 но­яб­ря и т\. д\.\). Определите, какое число будет на­пе­ча­та­но в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы.
Var k, m: integer;
Work: array

\[1\.\.15\]
of integer;
Begin
Work
\[1\]
:=5; Work
\[2\]
:=4; Work
\[3\]
:=5; Work
\[4\]
:=7; Work
\[5\]
:=6;
Work
\[6\]
:=12; Work
\[7\]
:=7; Work
\[8\]
:=3; Work
\[9\]
:=9; Work
\[10\]
:=7;
Work
\[11\]
:=0; Work
\[12\]
:=9; Work
\[13\]
:=1; Work
\[14\]
:=0; Work
\[15\]
:=8;
m := 0;
for k := 1 to 15 do
if Work
\[k\]
< 7 then m := m + 1;
writeln\(m\);
End.

  • 11
  • 8
  • 3