Найти все числа, которые делятся на N среди:а)всех двузначных чисел;б)всех трёхзначных чисел.
Найти все числа, которые делятся на N среди:
а)всех двузначных чисел;
б)всех трёхзначных чисел.
Гость
Ответ(ы) на вопрос:
Гостьvar
i,n:longint;
begin
readln(n);
for i:=10 to 99 do
if i mod n=0 then writeln(i);
end.
во втором случае цикл начинаем со 100 и до 999
Не нашли ответ?
Похожие вопросы