Дано двузначное число, определить, кратны ли единицы этого числа 5. И алгоритм пожалуйста.

Question

Дано двузначное число, определить, кратны ли единицы этого числа 5. И алгоритм пожалуйста.

Answer 1

Алгоритм на языке Pascal.

var
a:integer;
begin
write('Введите двузначное число: ');
readln(a);
if a mod 5 = 0
  then writeln('Кратны')
  else writeln('Не кратны');
end.

 

Принцип действия:

На ввод подается двузначное число, после чего находится его остаток при деления на 5 (a mod 5 ) , если он равен 0, то число кратно 5 (как все число, так и разряд едениц),  в противном случае - не кратно.