Найти все числа, которые делятся на n среди: а)всех двузначных чисел; б)всех трёхзначных чисел.

мод8 мод8    2   28.05.2019 13:50    4

Ответы
Solari Solari  26.06.2020 06:22
Var
i,n:longint;
begin
readln(n);
for i:=10 to 99 do
  if i mod n=0 then writeln(i);
end.
во втором случае цикл начинаем со 100 и до 999
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика