Напишите алгоритм для подсчёта произведения чисел от 3 до 27 , кратных 5
Напишите алгоритм для подсчёта произведения чисел от 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.
Не нашли ответ?
Похожие вопросы