Question

З'ясувати чи число А кратне 5. Відповідь вивести у вигляді Yes/No

Answer 1

Var a:integer;
begin
write('a='); readln(a);
if a mod 5 = 0 then writeln('Yes') else writeln('No'); 
end.

Пример:
a=15
Yes

Answer 2

// PascalABC.NET 3.1, сборка 1192 от 07.03.2016
begin
  var a:=ReadInteger('n=');
  if a mod 5=0 then Writeln('Yes')
  else Writeln('No')
end.

Answer 3

Щоб визначити, чи є число А кратним 5, потрібно перевірити, чи ділиться воно на 5 без остачі. Якщо так, то відповідь буде "Yes" (так), інакше - "No" (ні).

Перевірка кратності числа А на 5

Для перевірки кратності числа А на 5, потрібно виконати наступну операцію:

A % 5 == 0

Якщо ця умова виконується, то число А кратне 5. Якщо умова не виконується, то число А не є кратним 5.

Відповідь

Отже, щоб визначити, чи є число А кратним 5, потрібно виконати перевірку за допомогою умови `A % 5 == 0`. Якщо ця умова виконується, то відповідь буде "Yes" (так), інакше - "No" (ні).