Определите, какое число будет напечатано в результате работы следующей программы. Var k, m: integer; Tur: array[1..10] of integer; Begin Tur[1] := 1; Tur[2] := 11; Tur[3] := 8; Tur[4] := 12; Tur[5] := 5; Tur[6] := 6; Tur[7] := 15; Tur[8] := 16; Tur[9] := 16; Tur[10] := 21; m := 5; For k := 1 to 10 Do If Tur[k] < 12 Then Begin m := m + Tur[k]; End; Writeln(m); End. 21 5 36 38
Задание

Определите, какое число будет напечатано в результате работы следующей программы.
Var k, m: integer;
Tur: array

\[1\.\.10\]
of integer;
Begin
Tur
\[1\]
:= 1;
Tur
\[2\]
:= 11;
Tur
\[3\]
:= 8;
Tur
\[4\]
:= 12;
Tur
\[5\]
:= 5;
Tur
\[6\]
:= 6;
Tur
\[7\]
:= 15;
Tur
\[8\]
:= 16;
Tur
\[9\]
:= 16;
Tur
\[10\]
:= 21;
m := 5;
For k := 1 to 10 Do
If Tur
\[k\]
< 12 Then
Begin
m := m + Tur
\[k\]
;
End;
Writeln\(m\); End.

  • 21
  • 5
  • 36
  • 38