var
i:integer;
s,m:string;
begin
<em>readln(s);
</em>
for i:=1 to Length(s) do
if s[i] in ['0'..'9'] then m:=m+s[i];
<em>write(m);</em>
<span>end.</span>
2^5 = 32
Ответ 32^3 = 32768
или 2^(5+5+5) = 2^15 = 32768
Var M: array[1..15] of integer;
i, count: integer;
begin
for i := 1 to 15 do begin
M[i] := random(15);
write(M[i]:3);
if(M[i] mod 2 = 0) then inc(count);
end;
writeln(#10, 'Кол-во четных элементов: ', count);
<span>end.</span>
В циклах такого типа известно число повторений цикла, т.е. оно является фиксированным числом. В этом случае переменная, которая считает количество повторений (шагов) цикла, называется счетчиком цикла (или параметром цикла, или управляющей переменной цикла).
3434. 3 - В, ;4 - Г, эта расшифровка имеет только один способ : ВГВГ, ведь в алфавите нет ни 34, ни 43 буквы