Даны целые числа m и n. Определить, являются ли они делителями значения суммы первой и...

Question

Даны целые числа m и n. Определить, являются ли они делителями значения суммы первой и предпоследней цифры целого четырехзначного целого числа с использованием операторов "mod" и "div"

Comments

четырехзначное число же вводится с клавиатуры? а еще на паскале надо?

---

Да, на паскале, четырехзначное число вводится с клавиатуры

Answer 1

Var

m,n,s,p:integer;

Begin

read(m,n,s);

p:= (s mod 10) + (s div 100 mod 10); {p сумма цифр}

If (p mod m = 0) and (p mod n = 0) then

writeln('Числа ',m,' и ',n,' являются делителями числа ',p)

else

writeln('Числа ',m,' и ',n,' не являются делителями числа ',p);

end.

Объяснение из скобок можешь убрать

Comments

s это четырехзначное число

---

Спасибо

---

Пожалуйста, люблю работать на паскале)

---

изменила ответ, я прочитала последней и первой цифр, вместо предпоследней и первой, там немного изменилось. Сорррриии

---

Хорошо, спасибо