Var m,n,s,x:integer;beginreadln(m,n);x:=m;while (m>0)and(n<>0)and(x>=n) dom:=m-n;s:=0;while m<1 dobegins:=s+1;m:=m+1end;
m:=x;x:=n;while (n>0)and(m<>0)and(x>=m) dobeginn:=n-m; s:=0end;while n<1 dobeginn:=n+1;s:=s+1end;writeln(s)end.
<span>2) basa.txt, третий вариант не подходит как так там стоит ":"</span>
042
Из первого кода правильно получается цифра 2 (так как 8 из 4 не правильно, а шесть есть и в 1, и во втором на одинаковых местах). Из второго цифра 4. И из третьего цифра 3.
Левый столбик ответ: elpack.ty
Правый clock.tt