var
N, count:integer;
begin
write('N = ');
readln(N);
count := 0;
while N > 0 do
begin
if (N mod 10) mod 3 = 0 then
count := count + 1;
N := N div 10;
end;
writeln('Count = ', count);
readln;
end.
30С.7
+ 2A1.8
----------
5AD.F
7+8=15₁₀=F₁₆
C₁₆+1=D₁₆
0+A₁₆=A₁₆
3+2=5
Вот так, конструктор и игрушка - разные множества, а заводная игрушка - общий элемент, который входит в оба множества
Скорость(1)=3Мб
Время(1)=60c
Время(2)=20c
_____________
Скорость(2) - ?
Найдем скорость передачи файла:
Теперь надо найти размер файла:
Скорость(2)