Виктор
7 год назад
Назовем число клевым, если его предпоследняя цифра равна 7. По данным двум числам а и b выведите все клевые числа от a до b в порядке возрастания.
Ввод Вывод
70 72 70 71 72
Ввод Вывод
160 175 170 171 172 173 174 175
Pascal abc
ОТВЕТЫ
Laevonol
Jul 11, 2019
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.
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.
24
