Программа на языке Паскаль, которая проверяет делится ли введенное с клавиатуры число на 2, 3 и 5:

program CheckDivisibility;
var
x: integer;
begin
write('Введите число x: ');
readln(x);
if (x mod 2 = 0) then
writeln(x, ' делится на 2');
if (x mod 3 = 0) then
writeln(x, ' делится на 3');
if (x mod 5 = 0) then
writeln(x, ' делится на 5');
end.

Пользователю будет предложено ввести число, а затем программа проверит, делится ли это число на 2, 3 и 5, и выведет соответствующие сообщения.