• Вопрос по информатике:

    Помогите пожалуйста! Как на языке Паскаль записать не кратность.Например, икс не кратно 7. Обязательно объясните почему именно так)

    • Автор:

      michealmccormick
  • Ответ:

    Объяснение:

    program krat;

    var y,x:integer;

    begin

    y:=7;

    read (x);

    if (x mod y)=0 then

     writeln ('Кратно 7') else

     writeln ('Не кратно 7');

    end.

    Mod отвечает за остаток от деления, поэтому если число делится на 7 без остатка (mod = 0), то это число кратно 7.

    • Отвечал:

      janitorwfda

    Смотри.

    икс не кратно 7 записывается так:

    x mod 7≠0

    пример:

    If (x mod 7≠0) then begin

    mod это деление нацело, то есть

    14 mod 7=0 - 14 делится нацело на 7.

    только вместо знака ≠ надо писать знаки

     <  >

    если не сработает, попробуй

      >  <

    • Отвечал:

      jeromelwg2

    Ответов нет, но ты это испарвиш!