Назовем число клевым, если его предпоследняя цифра равна 7. По данным двум числам а и b выведите все клевые числа от a до b в порядке возрастания.

Ввод Вывод

70 72 70 71 72

Ввод Вывод

160 175 170 171 172 173 174 175

Pascal abc

Question

Фёдор

13 мая, 01:32

+3

Ответы (1)

Знаете ответ?

Панюха · Answer 1

Var

a, b, i:integer;

begin

readln (a, b) ;

for i:=a to b do

if (i mod 100) div 10 = 7 then write (i,' ') ;

end.