Напишите программу, которая вводит натуральные числа а и b и выводит на экран все нАтуральные числа на отрезке [ a , b ] , делящиеся на каждую из своих цифр. Входные данные Входная строка содержит два натуральных числа – значения a и b , разделённых пробелами. Гарантируется, что a ≤ b . Выходные данные Программа должна вывести в одну строчку все натуральные числа на отрезке [ a , b ] , делящиеся на каждую из своих цифр. Числа разделяются пробелами. Примеры Входные данные 10 20 Выходные данные 11 12 15 На паскале

Атуральные числа на отрезке [ a , b ] , делящиеся на каждую из своих цифр. Входные данные Входная строка содержит два натуральных числа – значения a и b , разделённых пробелами. Гарантируется, что a ≤ b . Выходные данные Программа должна вывести в одну строчку все натуральные числа на отрезке [ a , b ] , делящиеся на каждую из своих цифр. Числа разделяются пробелами. Примеры Входные данные 10 20 Выходные данные 11 12 15 На паскале

Ответы:
Гулия Соколенко
15-05-2018 06:32

Var    a, b, i, t:integer;    c:boolean;begin    read (a, b);    for i := a to b do        begin            t := i;            c := true;            repeat                if (t mod 10 = 0) or (i mod (t mod 10) <> 0)                    then c := false;                t := t div 10;                until t > 0;            if c = true then write (i, )        end;end.

Картинка с текстом вопроса от пользователя Руслан Поваляев

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Напишите программу, которая вводит натуральные числа а и b и выводит на экран все н» от пользователя Руслан Поваляев в разделе Информатика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!