Потапова 79275136869323
?>

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

Информатика

Ответы

kabanovae

program z1;

var a,b,i,c,k:integer;

begin

read (a, b);

for i:=a to b do

begin

c:=i;

if c mod 10 = 0 then k:=1 else k:=0;

while (c > 0) and (k = 0) do

begin

if i mod (c mod 10) <> 0 then k:=1;

c:=c div 10;

if (c>0) and (c mod 10 = 0) then k:=1    

end;

if k = 0 then write (i,'  ')

end

end.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Напишите программу, которая вводит натуральные числа а и b и выводит на экран все натуральные числа на отрезке [ a , b ] , делящиеся на каждую из своих цифр. Входные данные Входная строка содержит два натуральных числа – значения a и b , разделённых пробелами. Гарантируется, что a ≤ b . Выходные данные Программа должна вывести в одну строчку все натуральные числа на отрезке [ a , b ] , делящиеся на каждую из своих цифр. Числа разделяются пробелами.
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

ilez03857
sedalex
Елена
Александровна-Васильевна
Yurevich1243
Fomin Korablev1781
Korobeinikov-Yulich23
i7aster26
demochkoo
Вадим-Рашад323
nst-33764
vasavto1
infooem
pavtrusov
marinamarinazmeeva2444