Ответы
Ответ дал:
0
program raf105;
var a,b,pro,i:integer;
begin
write('A = ');
readln(a);
write('B = ');
readln(b);
pro:=1;
for i:=a to b do
if (i mod 5)=0 then
pro*= i;
writeln('Вывод: ',pro);
end.
Язык PascalABC
Вас заинтересует
1 год назад
1 год назад
1 год назад
8 лет назад