Форум » Обработка целых чисел » (№ 2340) В.Н. Шубинкин » Ответить
(№ 2340) В.Н. Шубинкин
Артур: Рассматривается множество целых чисел, имеющих 7 знаков в семеричной записи, которые в троичной системе счисления заканчиваются на 2, в восьмеричной не заканчиваются на 3 и в двенадцатеричной не заканчиваются на 5. Найдите количество таких чисел и максимальное из них. В ответе запишите два целых числа: сначала количество, затем максимальное число. Ответ:147061 823538 var max,n,k,p,i,x: integer; begin n:=0; max:=0; for i:=1 to 10000000 do begin x:=i; p:=0; while x>0 do begin k:= x mod 7; x:= x div 7; p:=p+1; end; if (p=7) and ( i mod 3 =2) and ( x mod 8 <>3) and (x mod 12<>5) then begin n:=n+1; if i> max then max:=i; end; end; writeln(n,' ',max); end. Не сходится: 235298 823541
Ответов - 1
polyakovss: if (p=7) and ( i mod 3 =2) and ( i mod 8 <>3) and ( i mod 12<>5) then
полная версия страницы