Дано двузначное число, определить, кратны ли единицы этого числа 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 (как все число, так и разряд едениц),  в противном случае - не кратно.