Write a program in Pascal. Determine if there is at least one multiple of 5 among the numbers a, b.
| November 18, 2020 | education
program qq;
var a, b: integer;
begin
readln (a, b);
if a mod 5 = 0 then
write (‘Number_’ a ‘_ multiple of 5’)
else b mod 5 = 0 then
write (‘Number_’ b ‘_ multiple of 5’)
else
write (‘No numbers’);
end.
One of the components of a person's success in our time is receiving modern high-quality education, mastering the knowledge, skills and abilities necessary for life in society. A person today needs to study almost all his life, mastering everything new and new, acquiring the necessary professional qualities.
