А-37,Б-6загадала и что дальше??
Третий вариант.
Четвертый длиннее. А два первых не удовлетворяют условию " ни одно кодовое слово не является началом другого"
1)
2
"1011"
5
"21"
10
"11"
2)
5
"34"
15
"14"
3)4
"123"
6
"43"
8
"33"
12
"23"
24
"13"
текст скрипта
c = 27
ch="3"
for i in 2..36
t = c.to_s(i)
if t[t.length-1..t.length-1] == ch
p i,t
end
end
Var
c:array [1..20] of integer;
i,n:integer;
Begin
randomize;
for i:=1 to 20 do
c[i]:=random(50);
for i:=1 to 20 do
write(c[i],' ');
for i:=1 to 20 do
if c[i] mod 5=0 then n:=n+c[i];
writeln;
writeln('Сумма: ',n);
<span>End.</span>