Даны числа m и n. Причем m
porcupine 26 февраля 2023

Question

69

Даны числа m и n. Причем m

в избранное ссылка

Знаете ответ?

arnisfire · Accepted Answer

74

arnisfire

26 февраля 2023

var i,m,n,s: integer; Begin read (m,n); s: =1; for i: =1 to n do if i mod m=0 then s: =s*i; writeln (s); End.

комментировать

в избранное ссылка отблагодарить