Для делимости числа на 5 необходимо, чтобы последняя цифра числа была 0 или 5.

Написать процедуру проверки делимости числа n, вводимого с клавиатуры, на 5.

(Паскаль)

Question

Информатика

Дементий

19 июня, 03:45

Для делимости числа на 5 необходимо, чтобы последняя цифра числа была 0 или 5.

Написать процедуру проверки делимости числа n, вводимого с клавиатуры, на 5.

(Паскаль)

+4

Ответы (1)

Знаете ответ на вопрос?

Митродора · Answer 1

Var n:integer;

procedure delim (n:integer) ;

begin

if (n mod 5=0) then writeln ('Делится')

else writeln ('Не делится') ;

end;

begin

writeln ('Введите число') ;

readln (n) ;

delim (n) ;

end.

Для делимости числа на 5 необходимо, чтобы последняя цифра числа была 0 или 5.Написать процедуру проверки делимости числа n, вводимого с клавиатуры, на 5.(Паскаль)

Для делимости числа на 5 необходимо, чтобы последняя цифра числа была 0 или 5.

Написать процедуру проверки делимости числа n, вводимого с клавиатуры, на 5.

(Паскаль)