Ввели число, выясните , делится ли оно нацело на 3?

Ввели число, выясните , делится ли оно нацело на 3?
Гость
Ответ(ы) на вопрос:
Гость
Program n1; var a: integer; begin readln(a); if a mod 3=0 then write('делится') else write('не делится'); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы