Форум » Обработка числовых последовательностей » 27 (C4) Из задач для тренировки. №64 » Ответить
27 (C4) Из задач для тренировки. №64
DenGZM: Получился следующий код. program zadanie64; var a,n,i,m26:integer; R,R0:longint; begin readln(n); m26 := 0; R := 0; readln(a); for i := 2 to n do begin if (a mod 26 <> 0) and (a > m26) then m26 := a; readln(a); if (a * m26 > R) and (a * m26 mod 26 <> 0) then R := a * m26; end; readln(R0); if R0=R then begin writeln('Вычисленное контрольное значение ',R); write('Контроль пройден'); end else begin writeln('Вычисленное контрольное значение ',R); writeln('Контроль не пройден'); end; end. В программе находим только максимальное значение, не делящееся на 26. Затем сравниваем произведения. Является ли это верным и упрощенным решением данной задачи? Много подбирал тесты, все проходило.
Ответов - 3
Поляков: DenGZM пишет: Является ли это верным и упрощенным решением данной задачи? Вот контрпример: [pre2] 4 8 7 13 1 91[/pre2]
DenGZM: При таких данных выводит: Вычисленное контрольное значение 56 Контроль не пройден
Поляков: DenGZM пишет: При таких данных выводит: Вычисленное контрольное значение 56 Контроль не пройден Ну вот и я пр это. Это неверный ответ.
полная версия страницы