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

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

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

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

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