Дано целое число n. Нужно составить программу для определения, делится ли данное число на целое число m. помогите составить программу плз 9 класс ,язык паскаль
Var m,n :integer;beginreadln(n,m);if n mod m = 0 thenwriteln(' делится ')elsewriteln('неделится');end.
(отметь как лучшее пжл)
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Var m,n :integer;
begin
readln(n,m);
if n mod m = 0 then
writeln(' делится ')
else
writeln('неделится');
end.
(отметь как лучшее пжл)