Как написать программу на Pascal для определения кратности числа 5

Для написания программы на Pascal, которая будет определять кратность числа 5, нам понадобится следующий код:

1. Объявление переменных:

   var
   number: integer;

2. Ввод числа с клавиатуры:

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

3. Проверка кратности числа 5:

   if number mod 5 = 0 then
   writeln('1')
   else
   writeln('0');

4. Завершение программы:

   readln;

Полный код программы:

program CheckMultipleOfFive;

var
  number: integer;

begin
  writeln('Введите число:');
  readln(number);

  if number mod 5 = 0 then
    writeln('1')
  else
    writeln('0');

  readln;
end.

После ввода числа программа будет выводить "1", если число кратно 5, и "0", если число не кратно 5.