Ответ(ы) на вопрос:
Гостьvar i, n: integer;
begin
write('N = ');
readln(n);
for i:=1 to n do
if (n mod i = 0) and (i mod 5 = 0) then write(i, ' ');
end.
Не нашли ответ?
Похожие вопросы