var m,n:integer;
begin
readln(m,n);
if (m mod n)=0 then
write(m div n) else
writeln(m, на ,n, нацело не делится.);
end.
Помог ставь "Лучший ответ" ;)
Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.