Задание
Begin
Dat
Dat
Dat
Dat
Dat
m := 0;
for k := 1 to 10 do
if \(Dat⟨11⟩ \\gt 25\) and \(Dat⟨11⟩ mod 3 = 0\) then
m := m + 1;
writeln\(m\);
End.
Дан код программы:
var k, m: integer;
Dat: array
\[1\.\.10\]
of integer;Begin
Dat
\[1\]
:= 56; Dat\[2\]
:= 72;Dat
\[3\]
:= 20; Dat\[4\]
:= 41;Dat
\[5\]
:= 14; Dat\[6\]
:= 22;Dat
\[7\]
:= 30; Dat\[8\]
:= 12;Dat
\[9\]
:= 66; Dat\[10\]
:= 35;m := 0;
for k := 1 to 10 do
if \(Dat⟨11⟩ \\gt 25\) and \(Dat⟨11⟩ mod 3 = 0\) then
m := m + 1;
writeln\(m\);
End.
Определите, что будет выведено на экран в результате выполнения программы.