Даны целые числа A и B. Требуется определить, является ли число А кратным числу B

Question

Даны целые числа A и B. Требуется определить, является ли число А кратным числу B

Comments

Паскаль?

---

паскаль абс

Answer 1

Var A,B: integer;
begin
writeln("Введите А");
readln(A);
writeln("Введите B");
readln(B);
if (A mod B = 0) then
writeln("А кратно В");
else
writeln("А некратно В");
end.

Comments

спасибо огромное)

---

Вводится возраст человека. Вывести имеет ли право человек голосовать (голосовать начинают с 18 лет), если
не имеет, то вывести, сколько лет ему надо подождать. а с этим как быть?

---

var a: integer;