Назовем число клевым, если его предпоследняя цифра равна 7. По данным двум числам а и b выведите все клевые числа от a до b в порядке возрастания. Ввод Вывод 70 72 70 71 72 Ввод Вывод 160 175 170 171 172 173 174 175 Pas...
Назовем число клевым, если его предпоследняя цифра равна 7. По данным двум числам а и b выведите все клевые числа от a до b в порядке возрастания.
Ввод Вывод
70 72 70 71 72
Ввод Вывод
160 175 170 171 172 173 174 175
Pascal abc
Ответ(ы) на вопрос:
Гость
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.
Не нашли ответ?
Похожие вопросы