Напишите алгоритм для подсчёта произведения чисел от 3 до 27 , кратных 5
var
i, k : integer;
begin
k := 1;
for i := 3 to 27 do
if i mod 5 = 0 then k := k * i;
writeln (k);
end.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
