Question

ЗАДАНИЕ НА ПАСКАЛЬ: Написать программу и определить, делиться ли число N на 23.

Answer 1

program del_na_23;

var

n:integer;

begin

write('Введите n 》 ');

read(n);

if n mod 23 = 0 then

write('Число ',n,' делится на 23')

else

write('Число ',n,' не делится на 23')

end.