ВВЕСТИ 2 ЦЕЛЫХ ЧИСЛА. ОПРЕДЕЛИТЬ ДЕЛИТСЯ ЛИ 1 ЧИСЛО НА 2 (ДА ДЕЛИТСЯ) (НЕТ НЕ ДЕЛИТСЯ)

Question

67

в избранное ссылка

Знаете ответ?

jorevo · Accepted Answer

66

jorevo

09 августа 2022

Куда уж проще тоvar a,b: integer; beginreadln (a,b); if (a mod b=0) then writeln ('Делится') else writeln ('Не делится'); end.

комментировать

в избранное ссылка отблагодарить