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.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
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.