Ответы
Ответ дал:
0
program ex;
var k,h,m: longint;
begin
m:=1;
for k:=1 to 500 do begin
if k mod 5 = 0 then m:=m*k;
end;
write(m);
end.
var k,h,m: longint;
begin
m:=1;
for k:=1 to 500 do begin
if k mod 5 = 0 then m:=m*k;
end;
write(m);
end.
Похожие вопросы
2 года назад
7 лет назад
7 лет назад
9 лет назад
9 лет назад
10 лет назад