алг
нач
целтаб Ball[1:10]
цел k, m
Ball[1]:=42; Ball[2]:=25
Ball[3]:=13; Ball[4]:=18
Ball[5]:=15; Ball[6]:=55
Ball[7]:=48; Ball[8]:=13
Ball[9]:=64; Ball[10]:=45
m := Ball[1];
нц для k от 1 до 10
если Ball[k] > m то
m := Ball[k]
все
кц
вывод m
алг
нач
целтаб Ball[1:10]
цел k, m
Ball[1]:=42; Ball[2]:=25
Ball[3]:=13; Ball[4]:=18
Ball[5]:=15; Ball[6]:=55
Ball[7]:=48; Ball[8]:=13
Ball[9]:=64; Ball[10]:=45
m := Ball[1];
нц для k от 1 до 10
если Ball[k] < m то
m := Ball[k]
все
кц
вывод m
кон
алг
нач
целтаб Work[1:15]
цел k, m
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
нц для k от 1 до 15
если Work[k] > 6 то
m := m + 1
все
кц
вывод m
кон
алг
нач
целтаб Work[1:15]
цел k, m
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
нц для k от 1 до 15
если Work[k] < 7 то
m := m + 1
все
кц
вывод m
кон
алг
нач
целтаб Tok[1:10]
цел k, m
Tok[1] := 10; Tok[2] := 14
Tok[3] := 15; Tok[4] := 4
Tok[5] := 12; Tok[6] := 6
Tok[7] := 3; Tok[8] := 5
Tok[9] := 5; Tok[10] := 10
m := 0
нц для k от 1 до 10
если Tok[k] > 6 то
m := m + 2
все
кц
вывод m
кон
алг
нач
целтаб Tok[1:10]
цел k, m
Tok[1] := 10; Tok[2] := 14
Tok[3] := 15; Tok[4] := 4
Tok[5] := 12; Tok[6] := 6
Tok[7] := 3; Tok[8] := 5
Tok[9] := 5; Tok[10] := 10
m := 22
нц для k от 1 до 10
если Tok[k] > 10 то
m := m - 1
все
кц
вывод m
кон