Форум » Обработка целых чисел » 17.(№ 2326) (А. Куканова) » Ответить
17.(№ 2326) (А. Куканова)
Кэйт: Не совпадает ответ( Правильный ответ:1600 4210) Задание: Рассматривается множество целых чисел, принадлежащих числовому отрезку [3905; 7998], которые удовлетворяют следующим условиям: − цифра в разряде десятков отлична от 0 и 5; − цифра в разряде сотен принадлежит отрезку [2; 6]. Найдите количество таких чисел и минимальное из них. Моя программа: var i,min,n: integer; begin min:=7998; n:=0; for i:=3905 to 7998 do begin if ( (i mod 10) <> 0) and (( i mod 10) <> 5) then if ((((i mod 100)div 10)=2) or (((i mod 100)div 10)=3) or (((i mod 100)div 10)=4) or (((i mod 100)div 10)=5) or (((i mod 100)div 10)=6)) then begin n:=n+1; if i<min then min:=i; end; end; writeln(n,' ',min); end.
Ответов - 1
cabanov.alexey: i mod 10 - разряд единиц (i mod 100)div 10 - разряд десятков (i mod 1000)div 100 - разряд сотен
полная версия страницы