Var k,i,n,a:integer;
begin
read(n);
while i<n do begin
read(a);
if (a mod 10=6) then k:=k+1; i:=i+1;
end;
writeln('Чисел, оканчивающихся на 6: ', k);<span>
end.</span>
1) 34*16=544 бит (вес сообщения)
2) 12*16=192 бит (то, что приписали)
3) 544+192=736 бит (всего)
18
<span>О нет! Что-то пошло не так во время добавления ответа
Слишком коротко. Напишите минимум 20 символов, чтобы объяснить все.
</span>