Вопрос по информатике:
Дан числовой ряд, содержащий целые положительные числа, не превосходящие 300/вот на этом моменте я не поняла, что здесь имеется ввиду/. Количество неизвестно, но окончанием ввода числового ряда является ввод нуля. Найти число, для которого сумма делителей числа будет наибольшей, исключая из делителей ноль и само число
УМОЛЯЮ ПОМОГИТЕ
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 11.04.2016 11:38
- Информатика
- remove_red_eye 4999
- thumb_up 10
Ответы и объяснения 1
//Pascal ABC.NET v3.1 сборка 1172
Var
n,i,s,max,maxn:integer;
begin
n:=1;
max:=-1;
while n0 do
begin
readln(n);
for i:=1 to n div 2 do
if n mod i=0 then s:=s+i;
if max begin
max:=s;
maxn:=n;
end;
s:=0;
end;
writeln(maxn);
end.
Пример ввода:
23
45
67
12
23
0
Пример вывода:
45
- 12.04.2016 06:21
- thumb_up 46
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.