Задачу можно решить с помощью простой программы:
var n1,n2,i,j:integer;
begin
n1:=67;n2:=54;
for i:=1 to 100 do
for j:=1 to 100 do
if n1*i-n2*j = 10 then writeln(i,' ',j);
<span>end.
В ответе получим 34 и 42.
67*34-54*42=2278-2268=10
Если вместо 100 задать другие значения, то получим и другие решения задачи.</span>
17/2=8 остаток 1
8/2=4 остаток 0
4/2=2 остаток 0
2/2= 1 остаток 0
Получается 10001 (2)= 17(10)
цифр 0 в двоичном представлении 3
Const
n=10;
var
a:array[1..n]of integer;
i:integer;
begin
for i:=1 to n do
read(a[i]);
for i:=1 to n do
if a[i]>5 then
a[i]:=100;
for i:=1 to n do
write(a[i]:4);
end.