Владелец круп­но­го яб­ло­не­во­го сада в те­че­ние 12 лет за­пи­сы­вал в таб­ли­цу App ко­ли­че­ство со­бран­но­го урожая. \(App⟨0⟩ — ко­ли­че­ство тонн яблок, со­бран­ных за пер­вый год, App⟨1⟩ — за вто­рой и т\. д\.\). Определите, какое число будет на­пе­ча­та­но в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы:

Var k, m: integer;
App: array

of integer;
Begin
App:=100; App:=128;
App:=80; App:=99;
App:=120; App:=69;
App:=55; App:=115;
App:=84; App:=111;
App:=59;App:=100;
m := 0;
for k := 1 to 12 do
if App > 100 then
begin
m := m + 1;
end;
m := m + 10;
writeln\(m\);
End.