• Напишите алгоритм для подсчёта произведения чисел от 3 до 27 , кратных 5

Ответы 1

  • 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.

    • Автор:

      wayneua1l
    • 6 лет назад
    • 0
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years