Даны два натуральных числа a, b (b≥a). с какого наиболее оптимального алгоритма можно найти число n (a≤n≤b), у которого произведение всех его цифр на данном числовом отрезке наибольшее.
113
461
Ответы на вопрос:
var
a, b, n, i, j, t: integer;
s, sn: string;
begin
write ('введите начало отрезка: ');
readln (a);
write ('введите окончание отрезка: ');
readln (b);
n : = 0;
for i : = a to b do begin
s : = inttostr (i);
t : = 1;
for j : = 1 to length (s) do
t : = t * strtoint (s[j]);
if t > n then begin
sn : = s;
n : = t;
end;
end;
writeln ('число с наибольшим произведением цифр: ' + sn);
end;
Популярно: Информатика
-
Праемпт12.12.2021 05:26
-
Lizzkkaa18.04.2020 05:53
-
anastasiyaryum127.07.2022 03:10
-
TheBrayn11.06.2020 12:37
-
mendygulkurman24.10.2021 15:16
-
daryalit196726.07.2021 18:58
-
GoldGriffon21.01.2023 20:01
-
яся7206.11.2020 21:33
-
Lophin16.04.2021 21:48
-
чулпан200803.05.2021 12:33