Пользователь вводит два числа если большее кратно меньшему то найдите их сумму в противном случае найдите их частное

Пользователь вводит два числа если большее кратно меньшему то найдите их сумму в противном случае найдите их частное
Гость
Ответ(ы) на вопрос:
Гость
var a,b:integer; Begin   read(a,b);   if ((a>b) and (a mod b = 0))     or ((b>a) and (b mod a = 0)) then writeln(a+b)   else writeln(a-b); End.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы