Помогите пожалуйста! Как ** языке Паскаль записать не кратность.Например, икс не кратно...

Question

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

Answer 1

Ответ:

Объяснение:

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.

Answer 2

Смотри.

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

x mod 7≠0

пример:

If (x mod 7≠0) then begin

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

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

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

" alt=" < > " align="absmiddle" class="latex-formula">

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

< " alt=" > < " align="absmiddle" class="latex-formula">