Задать вопрос
4 августа, 06:56

Написать програму в паскале: Найти кол-во чисео от 1 до n кратных 15

+1
Ответы (1)
  1. 4 августа, 07:48
    0
    colishestvo15:=0;

    for i:=1 to n do

    if a[i] mod 15=0

    then colishestvo15:=colishestvo15 + 1;

    writeln (colishestvo15);

    end.

    (͡° ͜ʖ ͡°)
Знаешь ответ на этот вопрос?
Сомневаешься в правильности ответа?
Получи верный ответ на вопрос 🏆 «Написать програму в паскале: Найти кол-во чисео от 1 до n кратных 15 ...» по предмету 📕 Информатика, используя встроенную систему поиска. Наша обширная база готовых ответов поможет тебе получить необходимые сведения!
Найти готовые ответы