Регистрация
huifufjvJf
24.06.2020 14:56
Информатика
Есть ответ 👍

Назовём пару чисел зеркальной, если при записи любого из чисел справа налево получается его пара. Пример зеркальной пары чисел: 185 и 581. На любом известном Вам языке программирования напишите программу для нахождения максимального числа-палиндрома в промежутке [1, 10N], представляющего собой произведение пары зеркальных чисел.

ответ для промежутка [1; 108]: (ответ)

ответ для промежутка [1; 1014]: (ответ)

140
433
Посмотреть ответы 1

Ответы на вопрос:

Nastya4002
Nastya4002
4,5(96 оценок)

var masiv: array[1..10000] of longint; i: longint;

begin

    (n = konetz massiva)

    for i: =1 to n do

        if masiv[i]=> 100 then

              begin

                    masiv[i]: =round(masiv[i]/100);

                    write(masiv[i],' m | ');

              end else

              begin

                  write(masiv[i],' cm | ');

              end;

readln;

end;

 

Популярно: Информатика